1.Сколько раз будет повторен цикл и каким будет значение переменной s после исполнения этой последовательности операторов?S:=0; i:=6; While i<=9 do begin S:=S + 12; i:=i + 1; end;

234

257

Посмотреть ответы 1

Ответы на вопрос:

kense

Информатика

4,8(99 оценок)

Var a: array [1..200,1..200] of integer; i,k,m,n: integer; begin writeln ('введи размерность массива'); readln (m,n); for i: =1 to m do begin for j: =1 to n do begin a[i,j]: =random(91)-90; write (a[i,j]: 4); end; writeln; end; for j: =1 to n do if a[m,j] mod 4=0 then inc(k); writeln (k); readln; end.