Дано целое двухзначное положительное число n. Составьте программу, которая определяет, входит ли в него цифра 4. (Скорее всего по Поскалю надо решать)

Question

Информатика

Николя

7 сентября, 20:53

Дано целое двухзначное положительное число n. Составьте программу, которая определяет, входит ли в него цифра 4. (Скорее всего по Поскалю надо решать)

+5

Ответы (1)

Знаете ответ на вопрос?

Маря · Answer 1

Program primer;

Uses crt;

var a: integer;

begin clrscr;

write ('Введите число a = ') ;

readln (a) ;

writeln;

if ((a mod 10) = 4) or ((a div 10) = 4) then

writeln ('Цифра 4 входит в число ')

else

writeln ('Цифра 4 не входит в число ') ;

readln;

end.