1. Напишите класс, который принимает с клавиатуры двузначное число и проверяет, что больше: само это число или произведение его цифр.

Question

Информатика

Пальмира

5 апреля, 04:50

1. Напишите класс, который принимает с клавиатуры двузначное число и проверяет, что больше: само это число или произведение его цифр.

+3

Ответы (1)

Знаешь ответ?

Мелитика · Answer 1

Uses crt;

var a:integer;

begin

clrscr;

if a> ((a mod 10) * (a div 10)) then writeln ('A bolshe') else

if a< ((a mod 10) * (a div 10)) then writeln ('Proizvedeniye bolshe') else

writeln ('Ravni');

end.