Помогите составить программу на языке паскаль
Составить программу разветвляющей структуры
Написать прогрумму, которая проверяет, является ли введенное с клавиатуры число четным и положительным
Составить программу разветвляющей структуры
Написать прогрумму, которая проверяет, является ли введенное с клавиатуры число четным и положительным
Answers & Comments
begin
read(a);
if a mod 2=0 then writeln('Число четное')
else writeln('Число нечетное')
end.