Срочно даю 25 баллов!!! Даны 2 числа a и b. Найдите сумму и частное их квадратов. Значения переменных a и b введите с клавиатуры.
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.
отметьте пожалуйста как лучшее
Сделано
Спасибо:)