Witam. Chciałbym pominąć pierwszy element pętli FOR w Pascalu.
Podany program drukuje na ekranie kształt koperty (dla ułatwienia boki składają się z cyfr). Wygląda to tak:
Jakie macie pomysły na usunięcie pierwszej 5 i 3?
PROGRAM Koperta;
Uses CRT;
VAR xyz,x,y,z,abc:Integer;
BEGIN
ClrScr;
xyz:=40;
abc:=1;
for x:=1 to 21
do write('1':2);
for y:=1 to 7
do begin
writeln('2':2,'3':abc,'5':xyz);
write('4':44);
writeln;
abc:=abc+3;
xyz:=xyz-6;
if (abc=1) or (xyz=40)
then continue;
end;
for z:=1 to 22
do write('1':2);
Readkey;
END.