«Вычисления по известным формулам». Написать программу: 15 Известны ширина и длина...

Question

«Вычисления по известным формулам». Написать программу: 15 Известны ширина и длина прямоугольника. Сколько квадратов со стороной А можно вырезать из данного прямоугольника?

Answer 1

Если брать ширину 4 клеточки, а длину 6 клеточек, и задать сторонку квадрата 2 то будет  6 квадратов.. ..

программа без всяких проверок, если нужно то уже в лс.

 

uses crt;
var d,sh,a,z:real;
begin
writeln('write dlinu ');
readln(d);
writeln('write shirinu');
readln(sh);
writeln('write dlina storony a ');
readln(a);
z:=(d*sh)/sqr(a);
writeln(z);
readln;
end.