Question

Напишите программу на Pascal!
Является ли сумма трех чисел четным числом?

Answer 1

Program sum;
var  a, b, c : integer;
 begin  writeln('Введите три числа:');
 readln(a, b, c);
  if ((a+b+c) mod 2) = 0
 then writeln('Сумма введенных чисел четная')
 else writeln('Сумма введенных чисел нечетная');
end.

Answer 2

Program sum;
var a, b, c : integer; begin writeln('Введите три числа:'); readln(a, b, c); if ((a+b+c) mod 2) = 0 then writeln('Сумма введенных чисел четная') else writeln('Сумма введенных чисел нечетная');end.

Answer 3

не получается нормально отформатировать код, надеюсь, что вы разберетесь

Answer 4

спасибо