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

Первые два вчера писал: http://znanija.com/task/1944982   В третьем не уверен в самом алгоритме...   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.