Составить программу "Спросить у пользователя число. Проверить, делится ли оно без остатка на 19. Если да, то вывести «делится на 19», иначе вывести «Назойливый остаток
Ответы
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Популярные вопросы в разделе
Составить блок-схему для нахождения суммы всех натуральных чисел, кратных 10.
Автор: denbelousov963
Зинформатики опиши переміщення файлів з папки. d: \папка 1 до папки c: \папка 2
Автор: Irinalobanowa
С чем это может быть связано?
Автор: alexandergulyamov
Program Sanya2263;
var a: integer;
begin
Read(a);
if a mod 19 = 0 then Write ("делится на 19")
else Write("назойливый остаток");
end.