code. compile. run. debug. share.
program ForPascal;
var
// deklarujemy licznik iteracji
// przyjęło się nazywać go "i"
i: Integer;
begin
// definiujemy, że iterujemy od 1 do 10 włącznie(!)
for i := 1 to 10 do begin
// wypisujemy tekst wraz z wartością licznika
writeln('Cześć. Iteracja nr ', i);
end;
// teraz iterujemy od tyłu
for i := 10 downto 1 do begin
// wypisujemy tekst wraz z wartością licznika
writeln('Jeszcze raz. Iteracja nr ', i);
end;
end.
Compiling Program...
Standard Input:
Interactive Console
Text
Program is not being debugged. Click "Debug" button to start program in debug mode.
| # | Function | File:Line |
|---|
| Variable | Value |
|---|
| Register | Value |
|---|
| Expression | Value |
|---|
| # | Description |
|---|