N 1 a i end

N 1 a i end
N 1 a i end
N 1 a i end. Var i,n:integer; begin write('n='); readln(n); for i:=1 to n do write(i, ', '); end.. 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 begin. for i : integer = 1 to n.
N 1 a i end
N 1 a i end. For i 1 to n do begin в паскале. readln(n). readln в паскале. for to do паскаль программа begin end.
N 1 a i end
N 1 a i end
N 1 a i end
N 1 a i end
N 1 a i end
N 1 a i end. For i 1 to 5 do в паскале. for to do паскаль программа begin end. program_1 var i: integer. do begin в паскале.
N 1 a i end
N 1 a i end
N 1 a i end
N 1 a i end
N 1 a i end
N 1 a i end
N 1 a i end
N 1 a i end
N 1 a i end
N 1 a i end
N 1 a i end. 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.
N 1 a i end
N 1 a i end
N 1 a i end
N 1 a i end
N 1 a i end
N 1 a i end
N 1 a i end
N 1 a i end
N 1 a i end
N 1 a i end
N 1 a i end
N 1 a i end
N 1 a i end. While do begin. х 1 while x<10 do begin x: x+3 x: x+1 end;. while (i= 1 to n do). i:=1; while 0.
N 1 a i end
N 1 a i end
N 1 a i end
N 1 a i end
N 1 a i end. Program_1 var i: integer. var a,b,c,d: integer; begin readln(a); readln(b); readln(c); readln(d); writeln((a+b+c+d)/4); end. program var begin. program a1; var a:integer; begin writeln('введите значение угла') readln.