Ezt übereljétek!
program logout;
var i:integer;
begin
clrscr;
for i:=1 to 2 do
begin
write('|');
clrscr;
write('/');
clrscr;
write('-');
clrscr;
write('\');
clrscr;
i:=1;
end;
readln;
end.
Jegyzettömbbe írtam, nem tudok programozni, sosem szerettem, de elvileg működnie kell.
[ Szerkesztve ]
As if all this was something more than another footnote on a postcard from nowhere, another chapter in the handbook for exercises in futility...