Срочно даю 25 баллов!!! Даны 2 числа a и b. Найдите сумму и частное их квадратов....

0 голосов
17 просмотров

Срочно даю 25 баллов!!! Даны 2 числа a и b. Найдите сумму и частное их квадратов. Значения переменных a и b введите с клавиатуры.


Информатика (16 баллов) | 17 просмотров
Дан 1 ответ
0 голосов

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.

(446 баллов)
0

отметьте пожалуйста как лучшее

0

Сделано

0

Спасибо:)