Задача 2. Вивід послідовності 1 3 5 7 9

Організація циклів.

Задача 1. Виведення послідовності чисел 1 2 3 4 5 і 5 4 3 2 1

За допомогою for   За допомогою while За допомогою repeat
var i:integer; begin Fori:=1 to5 do write(i,' '); writeln;   fori:=5 down to1 do write(i,' '); writeln; writeln; end. var i:integer; begin i:=1; whilei<=5 do begin write(i,' '); i:= i +1; end; writeln; i:=5; whilei>=1 do begin write(i,' '); i:=i-1; end; writeln; writeln; end. var i:integer; begin i:=1; repeat write(i,' '); i:=i+1; untili>5; writeln; i:=5; repeat write(i,' '); i:=i-1; untili<1; writeln; end.

 

Задача 2. Вивід послідовності 1 3 5 7 9

За допомогою for і проміжної змінної За допомогою while За допомогою repeat
Vari,x:integer; begin x:=1; fori:=1 to5 do begin write(x,' '); x:= x +2; end; writeln; end. Vari,x:integer; begin x:=1;while x<10 do beginwrite(x,' ');x:= x +2;end;writeln; end. Vari,x:integer; begin x:=1;repeat write(x,' ');x:= x +2;until x>=10;end.