Images F VAR I

< Previous photo
Photo - 32
Next photo >
F var i. Var i,n:integer; begin writeln('введите n'); readln(n); i:=1 while i<=n do begin write(i,' '); i:=i+1; end; end.. For i:=1 to n do writeln (a[i]). Var i integer. Var s,i:integer; begin.
Var i,n:integer; begin writeln('введите n'); readln(n); i:=1 while i<=n do begin write(i,' '); i:=i+1; end; end.. For i:=1 to n do writeln (a[i]). Var i integer. Var s,i:integer; begin.

See also