Question

Ввести два числа с клавиатуры. Найти их сумму. В ответе указать является ли сумма четной или нет (нужно вспомнить функции mod и div) помогите пожалуйста
30 баллов!!!!!

Answer 1

Ответ:

var

 x,y,z:integer;

 begin

   write('введите значения x и y: ');

   readln(x,y);

   z:=x+y;

     if z mod 2=0 then write('число z является чётным.')

     else write('число z является нечётным.');

     z:=z div 2;

     write(' z = ',z);

 end.