Помогите срочно,пожалуйста!
Задача по программе Паскаль.
Ввести число с клавиатуры,если это число кратно 8 и кратно 10,то вывести в ответ Yes, иначе No
Задача по программе Паскаль.
Ввести число с клавиатуры,если это число кратно 8 и кратно 10,то вывести в ответ Yes, иначе No
Answers & Comments
var a: integer;
begin
readln(a);
if (a mod 8=0) and (a mod 10=0) then writeln('Yes') else writeln ('no')
end.