4. Определите результат работы программ:
1)
var а, b: integer;
begin
a := 26 mod 11;
b := 3;
b := 6 + a * b;
a := b / 3 * a;
writeln(а);
end.
2)
var s, k: integer;
begin
s := 0;
for k := 12 to 15 do
s := s + 13;
writeln(s);
end.
Нет комментариев