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.

1) Ошибка "Нельзя преобразовать тип real к integer"При исправлении var    a, b: real;begin    a := 26 mod 11;    b := 3;    b := 6 + a * b;    a := b / 3 * a;    writeln(a);end.выдает 242) 52