
Епимах
4 год назад
Пожалуйста посчитайте,пожалуйста,даю 50 поинтов!Задание Pascal.Ввести число с клавиатуры,если это число кратно 8 и кратно 10,то вывести в ответ Yes, иначе No
ОТВЕТЫ

Aleksej
Oct 24, 2020
Var N:Integer;
begin
read(N);
if (N mod 8 = 0) and (N mod 10 = 0) then
write('YES')
else
write('=NO') ;
end.
608
Смежные вопросы: