Question

Составить программу которая из трёх данных чисел выдает наименьшее

Answer 1

Пишу на Паскале:
Var a,b,c,min:real;
Begin
read(a,b,c); If a&ltb then min:=a else min:=b;
If c&ltmin then min:=c;
Write(min);
End.

Answer 2

долговато

Answer 3

Сори, тут ошибка. Ща поправлю. И покорче сделаю.

Answer 4

Вот