ТутРешу.Ру

1. Напишите класс, который принимает с клавиатуры двузначное число…

Задание:

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

Решение:

Uses crt; var a: integer; beginclrscr; 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.




Знаете другой ответ?

Отправить свой ответ