Запишите алгоритм нахождения минимума из трех чисел a,b,c.

var a,b,c:integer;

Begin

  read(a,b,c);

  if (a>b) then a:=a else a:=b;

  if (a>c) then a:=a else a:=c;

  writeln(a);

End.

Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!

Загрузить картинку