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

Question

35

в избранное ссылка

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

baliq99 · Accepted Answer

79

baliq99

08 апреля 2023

Program Zadacha; Var a, b: integer; Begin Write ('введите 2 числа: '); ReadLn (a, b); WriteLn ('частное квадратов=', (a*a) / (b*b); ReadLn; End.

комментировать

в избранное ссылка отблагодарить