Реши задачи:

A) Определите, что будет напечатано в результате работы следующей программы.

var s, k:integer;

begin

s:= 100;

for k:= 0 to 10 do

s:= s – 5;

writeln (s);

end.

Б) Определите, что будет напечатано в результате работы следующей программы.

Var k,i: integer;

Begin

k := 4;

For i := 1 to 3 do

k := 2*k + i;

Writeln(k);

End.

В)Определите, что будет напечатано в результате работы следующей программы.

var s, k:integer;

begin

s:= 0;

for k:= 4 to 11 do

s:= s + k;

writeln (s);

end.

ElvirO    2   27.04.2020 20:58    0