Question

написать программу нахождения частного отделения двух чисел .

определить является ли целое число вводное с компьютера чётным.

Answer 1

var a,b:integer;
begin
read(a,b);
writeln(a/b);
end.


var a:integer;
begin
readln(a);
writeln(not odd(a));
end.