Написать программу, котороя вводит три целых числа в переменные а, b и c и находит из них минимальное
Var a,b,c,min:integer; begin readln (a,b,c); if (amin:=a; if (bmin:=b; if (cmin:=c; writeln (min); end.