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

Дан целочисленный массив из 40 элементов. Напишите программу на паскале, которая находит и выводит пару с наименьшей суммой среди непересекающихся пар соседних элементов. То есть первая пара - 1 и 2 элементы, а вторая пара - 3 и 4 элементы и тд

👇
Ответ:
25durak
25durak
18.01.2023

Объяснение:

Дан целочисленный массив из 40 элементов. Элементы массива могут принимать целые значения от –10 000 до 10 000 включительно. Опишите на русском языке или на одном из языков программирования алгоритм, который находит и выводит пару с наименьшей суммой среди непересекающихся пар соседних элементов. То есть, первая пара - 1-й и 2-й элементы, вторая пара - 3-й и 4-й элементы, и т.д.

Исходные данные объявлены так, как показано ниже. Запрещается использовать переменные, не описанные ниже, но разрешается не использовать часть из них.

4,5(72 оценок)
Ответ:
rejnmasha2018
rejnmasha2018
18.01.2023

числа задаются автоматом через  random

Объяснение:

var

 a : array [1..40] of integer;

 i, m, ind : integer;

begin

 randomize;

 for i := 1 to 40 do begin

   a[i] := random(100);

   if i mod 2 = 0 then write(a[i]:2, ' ')

   else write(a[i]:2, '__');

   if i mod 10 = 0 then writeln();

 end;

 m := 200;

 ind := -1;

 i := 1;

 repeat begin

   if m > (a[i]+a[i+1]) then begin

     m := (a[i]+a[i+1]);

     ind := i;

   end;

   i := i+2;

 end

 until i > 40;

 

 writeln('----- ', round((ind+1)/2) ,' пара минимальная -----');

 writeln(a[ind], ' ', a[ind+1]);

end.


Дан целочисленный массив из 40 элементов. Напишите программу на паскале, которая находит и выводит п
4,4(74 оценок)
Открыть все ответы
Ответ:
egorovartdin
egorovartdin
18.01.2023

1-ші буын машиналарының элементарлы базасы – электронды вакуумды шамдар

2-ші буын машиналарының элементарлы базасы – транзисторлар

3-ші буын машиналарының элементарлы базасы – кіші интегралды схемалар

4-ші буын машиналарының элементарлы базасы – үлкен интегралды схемалар

5-ші буын машиналарының элементарлы базасы – өте үлкен интегралды схемалар

 1642 жылы француз математигі Блез Паскаль он тоғыз жасында дүние жүзінде бірінші рет қосу машинасы деген атпен белгілі, жетектер мен дөңгелектерден түратын механикалық есептеу машинасын қүрастырды.

1761 жылы ағылшын Д.Робертсон жүгіртпесі бар навигациялық есептеулер жүргізуге арналған логарифм сызғышын жасады. Мүндай қүрал жасау идеясын 1660 жылдары Исаак Ньютон ұсынған болатын.

1833 жылы ол бағдарлама арқылы басқарылатын "Аналитикалық машина" жобасын жасады. Бүл машинада қазіргі компьютерлерде бар барлық негізгі қүраушылар: бастапқы сандар мен аралық нәтижелерді сақтауға арналған жад, жадтан алынған сандармен амалдар орындайтын арифметикалық қүрылғы, берілген бағдарлама бойынша есептеу барысын қадағалап отыратын басқару қүрылғысы, деректерді енгізу мен оларды басып шығару құрылғысы болып табылады.

1945 жылы венгер текті көрнекті американ математигі Джон фон Нейман ұсынған болатын. Нейман бойынша негізгі бөліктер басқару құрылғысы (БҚ) және арифметикалық-логикалық құрылғы (АЛҚ) жады, сырқы жады, енгізу және шығару құрылғылары болып табылады.

4,4(40 оценок)
Ответ:
alena13gerda
alena13gerda
18.01.2023

2-ое задание:

#include <iostream>

int main() {

int number;

std::cout << "Введите число: " << std::endl;

std::cin >> number;

if (number > 0)

 std::cout << "Положительное" <<std::endl;

else if (number < 0)

 std::cout << "Отрицательное" << std::endl;

else

 std::cout << "Ноль" << std::endl;

return 0;

}

1-ое задание:

#include <iostream>

int main() {

double dollars, grivnas;

std::cout << "Введите кол-во долларов: " << std::endl;

std::cin >> dollars;

grivnas = dollars * 28.3;

std::cout << dollars << " доллар-(а, ов) в гривнах " << grivnas << std::endl;

return 0;

}

Объяснение:

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