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

Question

Информатика

Веруля

3 марта, 04:09

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

+3

Ответы (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.