Определите, что будет напечатано в результате работы следующей программы.
Var s,і:integer;
Begin
s := 5;
For і := 2 to 5 do
s := s + 2* і;
Writeln (s) ;
End.

44
33
22
11

116

394

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

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

йцццу

Информатика

4,5(85 оценок)

ответ 33
Объяснение
5+2*2=9
9+2*3=15
15+2*4=23
23+2*5=33

olyailysha31

Информатика

4,4(67 оценок)

// pascalabc.net 3.0, сборка 1088 const nn=100; type vector=array[1..nn] of integer; function min(a: vector; n: integer): integer; var i,m: integer; begin m: =a[1]; for i: =2 to n do if a[i]< m then m: =a[i]; min: =m end; var v: vector; i,n,m,mn: integer; begin write('количество элементов вектора: '); read(n); write('значение m: '); read(m); randomize; writeln('*** сгенерированный вектор ***'); for i: =1 to n do begin v[i]: =random(101)-50; write(v[i],' ') end; writeln; mn: =min(v,n); if mn< =m then writeln('минимум ',mn,' не превышает ',m) else writeln('минимум ',mn,' превышает ',m) end. тестовое решение: количество элементов вектора: 20 значение m: -42 *** сгенерированный вектор *** -12 10 -47 8 6 -22 -4 8 -50 -2 36 -38 -39 -41 11 -46 41 -22 -50 24 минимум -50 не превышает -42