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

Марина19r Марина19r    2   18.05.2019 00:40    1

Ответы
poprop343 poprop343  11.06.2020 05:47

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

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика