25 ! даны 2 числа a и b. найдите сумму и частное их квадратов. значения переменных a и b введите с клавиатуры.

ЛордМирак ЛордМирак    3   06.10.2019 03:50    1

Ответы
burakova1985200 burakova1985200  09.10.2020 22:58

var a,b,s,c:real;

begin

writeln('Введите два числа через пробел:');

read(a,b);

a:=a*a;

b:=b*b;

s:=a+b;

c:=a/b;

writeln('Сумма их квадратов равна: ',s);

writeln('Частное их квадратов: ',c);

end.

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