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

1

Ответы и объяснения

  • Kael
  • хорошист
2013-11-29T13:11:41+04:00
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.