Есть ответ 👍

Объявить массив целых чисел из 1000 элементов.
Заполнить случайными числами в диапазоне от 0 до 100.
Выяснить, есть ли в массиве одинаковые элементы.
Вывести их значения и индексы.
Отчет должен содержать:
Описание оператора повторения for.
Описание объявления массива.
Полный текст программы для выполнения в среде MS Visual Studio 2012

278
316
Посмотреть ответы 1

Ответы на вопрос:


Var       n, sum, i : longint; begin       read(n);       for i : = 1 to n do             sum : = sum + sqr(i);       write(sum); end.

Популярно: Информатика