Определите, что будет напечатано в результате работы следующей программы. Var s,k: integer;

Begin

s := 0;

for k := 4 to 8 do

s := s+7;

writeln(s);

End.

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

var s, k:integer;

begin

s:= 1;

for k:= 1 to 7 do

s:= s + k;

writeln (s);

end.

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

var s, k:integer;

begin

s:= 0;

for k:= 4 to 11 do

s:= s + k;

writeln (s);

end.

С решениями

макс3069    3   24.10.2020 10:05    6