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.

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.