Дано натуральное число N. Вычислить разницу между самой большой и самой маленькой цифрой в записи этого числа.

Question

Информатика

Дашура

31 октября, 08:30

Дано натуральное число N. Вычислить разницу между самой большой и самой маленькой цифрой в записи этого числа.

+3

Ответы (1)

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

Нимфа · Answer 1

Var n, ni, ma, mi, i:int64;

nstr:string;

begin

ma:=0;

mi:=10;

read (n) ;

nstr:=inttostr (n) ;

for i:=1 to length (nstr) do begin

ni:=strtoint (nstr[i]) ;

if ni>ma then ma:=ni;

if ni
end;

writeln (ma-mi) ;

end.