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

ответ:
2. Определите, что будет напечатано в результате работы следующей программы.
Var s,k: integer;
Begin
s := 0;
for k := 4 to 8 do
s := s+7;
writeln(s);
End.
ответ:
3. Определите, что будет напечатано в результате работы следующей программы.
Var k,i: integer;
Begin
k := 4;
For i := 1 to 3 do
k := 2*k + i;
Writeln(k);
End.
ответ:
4. Определите, что будет напечатано в результате работы следующей программы.
Var s,k: integer;
Begin
s:=0;
for k:=1 to 11 do
s:=s+12;
write(s);
End.
ответ:
5. Определите, что будет напечатано в результате работы следующей программы.
var s, k:integer;
begin
s := 0;
for k := 2 to 12 do
s := s + 11;
writeln (s);
end.
ответ:

selix2017    2   19.05.2020 10:00    7