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

Question

Информатика

Боряев

4 год назад

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

ОТВЕТЫ

Йорданка

Oct 24, 2020

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.

выдает 24

2) 52

396