Решить в паскале (без массива) №1 составьте не менее трёх вариантов программы определения наименьшего их трех данных чисел. №2 составить программу сортировки по возрастанию значений трёх переменных : а, в,с . №3 заданы размеры а, в прямоугольного отверстия x, y,z кирпича. определить пройдет ли кирпич через отверстие .

первые два вчера писал:  

в третьем не уверен в самом

var

  a, b, x, y, z : real;

begin

  read (a, b, c, x, y);

  if ((a < = x) and (b < = y)) or ((a < = y) and (b < = x))

  or  ((a < = x) and (b < = z)) or ((a < = z) and (b < = x))

  or  ((a < = z) and (b < = y)) or ((a < = y) and (b < = z)) then writeln ('yes') else writeln ('no');

end.

юра из новгородатоля из москвы

алеша из томска

коля из перми

витя из санкт-петербурга 

все истина т.к.если пишется "или" то достаточно чтобы что-то одно было правдой,тогда и все истинно.