Решить в Паскале (без массива) №1 Составьте не менее трёх вариантов программы определения наименьшего их трех данных чисел. №2 Составить программу сортировки по возрастанию значений трёх переменных : А,В,С . №3 Заданы Размеры а,в прямоугольного отверстия x,y,z кирпича. Определить пройдет ли кирпич через отверстие .
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Первые два вчера писал: 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.