Даны 3 числа. Найти минимальное из них

Question

Информатика

Серж

2 января, 07:43

Даны 3 числа. Найти минимальное из них

+5

Ответы (1)

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

Игорка · Answer 1

uses crt;

var

a, b, c, min:integer;

begin

writeln ('Введи три числа: ') ;

readln (a, b, c) ;

min:=a;

if b
if c
writeln ('Наименьшее из этих чисел: ', min) ;

end.