Безотлагательно даю 25 баллов!!!Даны 2 числа a и b. Найдите сумму

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

Задать свой вопрос
1 ответ

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.

Людмила Шестоперова
отметьте пожалуйста как лучшее
Aleksej Dosin
Изготовлено
Рензин Руслан
Спасибо:)
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт