Вариант 7:1. Определить максимальное и минимальное значения из двух различных…

Question

36

Вариант 7:1. Определить максимальное и минимальное значения из двух различных вещественных чисел. 2. Дано трехзначное число. Определить, какая из его цифр большеа) первая или последняя, б) первая или вторая, в) вторая или последняя 3. Даны вещественные положительные числа a,b,c. Выяснить, можно ли прямоугольник со сторонами а,b уместить внутри прямоугольника со сторонами с, d так, чтобы каждая из сторон одного прямоугольника была параллельна или перпендикулярна каждой стороне второго прямо угольника.

категория: информатика

ответить

в избранное ссылка

Знаете ответ?

miroving · Accepted Answer

73

miroving

23 февраля 2023

1) var a, b: real; begin readln (a, b); if (a > b) then writeln (a) else if (a < b) then writeln (b) else writeln ('a=b'); end.2) var a, b, c: integer; begin readln (a); b: =a mod 100 div 10; c: =a mod 10; a: =a div 100; write ('a) '); if (a > c) then writeln (a) else if (a < c) then writeln (c) else writeln ('='); write ('b) '); if (a > b) then writeln (a) else if (a < b) then writeln (b) else writeln ('='); write ('c) '); if (c > b) then writeln (c) else if (c < b) then writeln (b) else writeln ('='); end.3 даже представить не могу, извините

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: