Даны два ненулевых числа. Найти частное их квадратов

Даны два ненулевых числа. Найти частное их квадратов
Гость
Ответ(ы) на вопрос:
Гость
Program Zadacha; Var     a, b: integer; Begin     Write('введите 2 числа:');     ReadLn(a, b);          WriteLn('частное квадратов = ', (a*a)/(b*b));              ReadLn; End.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы