М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
taoo
taoo
19.06.2021 21:45 •  Информатика

Ввести два числа и определить, что больше: сумма квадратов или квадрат суммы этих чисел. ответ вывести в виде сообщения. в c++

👇
Ответ:
эд104267
эд104267
19.06.2021

#include <iostream>

#include <math.h>

using namespace std;

int x,y,sumSquared,sumOfSquares;

int main() {

  cout <<"Введите x" << endl;

  cin >> x ;

  cout << "Введите y"<< endl;

  cin >> y;

sumSquared = pow(x*y,2);

  cout << "Сумма квадратов:";

  cout << sumSquared ;

  cout << "\n";

sumOfSquares = pow(x,2)+pow(y,2);

  cout << "Квадрат суммы:";

  cout << sumOfSquares ;

  cout << "\n";

  if (sumSquared > sumOfSquares){

      cout << "Сумма квалратов больше чем квадрат суммы";

      cout << "\n";

      cout << "ответ:";

      cout << sumSquared << endl;

  }

  else  {

      cout << "Квадрат суммы больше чем сумма квадратов";

      cout << "\n";

      cout << "ответ:";

      cout << sumOfSquares << endl;

  }

}

Объяснение:

Квадрат суммы:  (x + y)^2

Сумма квадратов: x^2 + y^2

Ну вроде бы правильно сделал ))

4,4(68 оценок)
Открыть все ответы
Ответ:
dsassaraf
dsassaraf
19.06.2021
//Pascal ABC.NET v3.1 сборка 1172

//For

Var
 ar:array[1..5] of integer;
 i:integer;
 r:real;
begin
 for i:=1 to 5 do
  begin
   readln(ar[i]);
   r:=r+ar[i];
  end;
 r:=r/i;
 writeln(r);
end.

//while

Var
 ar:array[1..5] of integer;
 i:integer;
 r:real;
begin
 while i<>5 do
  begin
   i:=i+1;
   readln(ar[i]);
   r:=r+ar[i];
  end;
 r:=r/i;
 writeln(r);
end.

//repeat

Var
 ar:array[1..5] of integer;
 i:integer;
 r:real;
begin
 repeat
   i:=i+1;
   readln(ar[i]);
   r:=r+ar[i];
 until i=5;
 r:=r/i;
 writeln(r);
end.
 

Пример ввода:
1
2
1
2
1
Пример вывода:
1.4
4,7(45 оценок)
Ответ:
arinaantonuyk
arinaantonuyk
19.06.2021
//Pascal ABC.NET v3.1 сборка 1172

//For

Var
 ar:array[1..5] of integer;
 i:integer;
 r:real;
begin
 for i:=1 to 5 do
  begin
   readln(ar[i]);
   r:=r+ar[i];
  end;
 r:=r/i;
 writeln(r);
end.

//while

Var
 ar:array[1..5] of integer;
 i:integer;
 r:real;
begin
 while i<>5 do
  begin
   i:=i+1;
   readln(ar[i]);
   r:=r+ar[i];
  end;
 r:=r/i;
 writeln(r);
end.

//repeat

Var
 ar:array[1..5] of integer;
 i:integer;
 r:real;
begin
 repeat
   i:=i+1;
   readln(ar[i]);
   r:=r+ar[i];
 until i=5;
 r:=r/i;
 writeln(r);
end.
 

Пример ввода:
1
2
1
2
1
Пример вывода:
1.4
4,5(16 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ