паскаль

Найти

наименьшую и наибольшую цифру в записи числа А.

Question

Воислава

14 февраля, 04:51

+3

Ответы (1)

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

Тарас · Answer 1

var

a: integer;

begin

readln (a) ;

a : = abs (a) ;

writeln (a. ToString (). Max (), ' ', a. ToString (). Min ()) ;

end.

паскальНайтинаименьшую и наибольшую цифру в записи числа А.