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

Написать кодом в visual studio на с++.

в одномерном массиве а(10) вычислить сумму элементов массива, отличающихся от максимального на 1.

👇
Ответ:
timurtim1
timurtim1
18.06.2022

#include "stdafx.h"

#include <iostream>

#include <string>

#include <fstream>

#include <windows.h>

using namespace std;

int main()  

{

setlocale(LC_ALL, "Russian");

float A[10];

cout << "Заполните массив данными:" << endl;

for (int i = 0; i < 10; i++)

{

 cout << "[" << i + 1 << "]: ";

 cin >> A[i];

}

float max = A[0];

for (int i = 0; i < 10; i++)

{

 if (A[i] > max)

 {

  max = A[i];

 }

}

cout << "\nМаксимальное значение: " << max << endl;

float summ = 0;

for (int i = 0; i < 10; i++)

{

 if ((A[i] + 1) == max)

 {

  summ += A[i];

 }

}

cout << "\nСумма элементов массива отличающихся от максимального на единицу: " << summ << endl;

return 0;

}

Объяснение:

Ищем максимальное число в массиве и далее ищем сумму всех элементов массива, которые отличаются от максимального на единицу. Т.е ищем сумму элементов, которые меньше максимального на единицу

4,5(41 оценок)
Открыть все ответы
Ответ:
zarizatamara00
zarizatamara00
18.06.2022
Var a1, b1, c1, a2, b2, c2, p1, p2, s1, s2: real;
begin
  writeln('Введите строны первого треугольника: ');
  read(a1, b1, c1);
  writeln('Введите стороны второго треугольника: ');
  read(a2, b2, c2);
  p1 := (a1 + b1 + c1) / 2;
  p2 := (a2 + b2 + c2) / 2;
  s1 := sqrt(p1 * (p1 - a1) * (p1 - b1) * (p1 - c1));
  s2 := sqrt(p2 * (p2 - a2) * (p2 - b2) * (p2 - c2));
  if (s1 + 1e-3 > s2) and (s1 < s2 + 1e-3) then writeln('Равновеликие')
                                           else writeln('Неравновеликие');
end.
4,6(100 оценок)
Ответ:
sofia308
sofia308
18.06.2022

В n будем хранить количество чисел, которые ещё нужно вывести. a и b - предыдущее и текущее числа Фибоначчи. По определению, следующее число Фибоначчи равно сумме двух предыдущих, так что новое значение b будет a + b. Чтобы не заводить новую временную переменную, новое значение a можно будет найти, вычитая из нового b старое a, получится (a + b) - a = b.

Код процедуры:

procedure print_fib(n: integer);

var a, b, t: integer;

begin

   a := 0;

   b := 1;

   while n > 0 do

   begin

       write(b, ' ');

       b := a + b;

       a := b - a;

       n := n - 1;

   end;

end;

Пример основной программы:

begin

   print_fib(10)

end.

Вывод:

1 1 2 3 5 8 13 21 34 55

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