Объявить массив целых чисел из 1000 элементов.
Заполнить случайными числами в диапазоне от 0 до 100.
Выяснить, есть ли в массиве одинаковые элементы.
Вывести их значения и индексы.
Отчет должен содержать:
Описание оператора повторения for.
Описание объявления массива.
Полный текст программы для выполнения в среде MS Visual Studio 2012
278
316
Ответы на вопрос:
Var n, sum, i : longint; begin read(n); for i : = 1 to n do sum : = sum + sqr(i); write(sum); end.
Популярно: Информатика
-
Lizka2285523.04.2022 03:24
-
gorbovaekateri05.10.2020 18:52
-
shcukinalena29.11.2020 09:37
-
Првнсл2845810.06.2021 11:32
-
жанель6712.07.2021 09:35
-
гриша16716.02.2023 03:17
-
лоо25дллллл11.01.2022 11:53
-
oskar913.05.2022 12:58
-
04789705.10.2021 07:27
-
Viktoria128915.06.2022 08:10