Размещено 4 года назад по предмету
Информатика
от valdim
Задание 3
Чему равно значение s после выполнения цикла
Program T3;
var s,k: integer;
begin
s := 2;
for k := 1 to 3 do
s := s * s;
writeln(s);
end.
Задание 4
Чему равно значение s после выполнения цикла
Program T4;
var s,n: integer;
begin
s := 0;
for n := 3 to 7 do
s := s + 2*n;
writeln(s);
end.
Задание 5
Чему равно значение s после выполнения цикла
Program T5;
var s,k: integer;
begin
s := 0;
for k := 6 to 12 do
s := s + 5;
writeln(s);
end.