Ответы
Ответ дал:
0
Program Zadacha;
Var
a, b: integer;
Begin
Write('введите 2 числа:');
ReadLn(a, b);
WriteLn('частное квадратов = ', (a*a)/(b*b));
ReadLn;
End.
Похожие вопросы
2 года назад
2 года назад
7 лет назад
10 лет назад
10 лет назад