Поместиться ли два квадрата со сторонами а см, в прямоугольнике длина которого с см, ширина d см, Известно что c>d. Паскаль!

Question

Информатика

Севастьян

16 августа, 22:11

Поместиться ли два квадрата со сторонами а см, в прямоугольнике длина которого с см, ширина d см, Известно что c>d. Паскаль!

+5

Ответы (1)

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

Кандида · Answer 1

Var

a, c, d, t:real;

begin

Write ('Введите сторону квадрата: '); Read (a);

Write ('Введите длину и ширину прамоугольника: ');

Read (c, d);

if c
if (d>a) and (c>2*a) then Writeln ('Два квадрата помещаются')

else Writeln ('Два квадрата не помещаются')

end.

Пример

Введите сторону квадрата: 8

Введите длину и ширину прамоугольника: 16.2 9

Два квадрата помещаются