задача1 и задача 2

[солнышко777]

Здравствуйте.

1)Определить, является ли число А делителем числа В? А наоборот?


2)Даны вещественные положительные числа а, b, c, d. Выяснить можно ли прямоугольник со сторонами а, b, уместить внутри прямоугольника со сторонами c, d так, чтобы каждая из сторон одного прямогольника была параллельна или перпендикулярна каждой стороне вто-рого прямоугольника.



заранее спасибо

[Don Karleone]

if (B mod A) = 0 then writeln('А является делителем B');
if (A mod B) = 0 then writeln('B является делителем A');

((c <= a) and (d <= b)) or ((d <= a) and (c <= a)) then writeln('можно уместить');