Определить кол-во чисел, кратных 5, трехзначных и сумму оканчивающих 9. (паскаль)

anarbaevalola anarbaevalola    1   30.08.2019 01:00    0

Ответы
NEON2006 NEON2006  26.08.2020 12:14
Program F1tsku;
var x:integer;
begin
writeln ('Введите число');
readln(x);
if (x mod 10=9) and (x mod 5=0) then
writeln('Да') else writeln('Нет');
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика