Задача 1
Определите, что будет напечатано в результате работы следующей программы
var s, n: integer;
begin
s := 0;
for n := 1 to 10 do
s := s + 9;
write(s);
end.

Задача 2
Определите, что будет напечатано в результате работы следующей программы
var m, n : integer;
begin
m := 50;
for n := 1 to 7 do
m := m – 7;
write(m);
end.

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

var s, k: integer;
begin
s := 0;
for k := 2 to 9 do
s := s + 2 * k;
write(s);
end.

Задача 4
Определите значение переменной с после выполнения следующего фрагмента программы:
a := 30;
b := 6;
a := a / 2 * b;
if a > b then
c := a - 12 * b
else c := a + 12 * b;

Задача 5
Определите значение переменной а после выполнения данного алгоритма:
a := 5
с := 3
с := 7 + a * с
a := с / 2 * a