Задание
Определите, что будет напечатано в результате работы следующих программ.
- Объекты 1
- Var s,k: integer;
Begin s := 0;
for k := 9 to 13 do s := s + 9;
writeln\(s\); End. - Var s, k: integer;
Begin s := 1;
for k := 0 to 9 do s := s + 5;
write \(s\); End. - Var s, n: integer;
Begin s := 5;
For n := 2 to 4 do s := s + \(n\-1\);
Writeln\(s\); End. - Var s, k: integer;
Begin s := 1;
for k := 0 to 4 do s := s*3;
write \(s\); End. - Var f,n: integer;
Begin f := 22;
f := f–20; For n := 1 to 5 do
f := f + n; Writeln\(f\);
End.
- Var s,k: integer;
- Объекты 2
- 45
- 51
- 11
- 243
- 17