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

изи в одну строчку решил, как и ожидалось

var a,b,c: integer;

begin

readln(a,b,c);

if a<b then if a<c then writeln(a) else writeln(c) else if b<c then writeln(b) else writeln(c);

end.

  v=331+0,6*(-35)=310 м/c

v=331+0,6*30=349 м/c

1)false (т.к. x> y)

2)true (x< y,x не равен y)

3)false(x> y)

4)true(т.к. x=y, x не равен y)