Дано целое двузначное число. Составить программу которая определяет входит ли в него цифра 4

Дано целое двузначное число. Составить программу которая определяет входит ли в него цифра 4
Гость
Ответ(ы) на вопрос:
Гость
На псевдокоде Алг(a,b,fl) Арг a,b Рез fl ввод(a;b) {где а-это десятки,b-еденицы} fl:=true Если (a=4)или(b=4) то fl:=true все Если fl=true то вывод('есть') иначе вывод('нету') конец
Гость
var   a:byte; begin   write('Введите число '); readln(a);   if (a div 10 = 4) or (a mod 10 = 4) then     writeln('В число входит цифра 4')   else     writeln('цифра 4 в число не входит'); end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы