Найти минимальную цифру в трехзначном числе

Question

Информатика

Евгений

2 декабря, 22:17

Найти минимальную цифру в трехзначном числе

+3

Ответы (2)

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

Александрушка · Answer 1

Паскаль:

var a, b, min : integer;

begin

readln (a) ;

min:=10;

while a 0 do

begin

b: = a mod 10;

if b < min then min:=b;

a: = a div 10

end;

writeln (min) ;

readln

end.

Силантий · Answer 2

Силантий 3 декабря, 00:15

0

100-минимальная трехзначное