1. Информатика
  2. Найти сумму элементов в массиве

Найти сумму элементов в массиве из 10 элементов заданных используя рандом
Паскаль

Спартак2102 Спартак2102    3   26.01.2021 13:57    2

Ответы
данила305 данила305  25.02.2021 14:00

var

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

 i,s: integer;

 begin

   s:=0;

   for i:= 1 to 10 do

   begin

     a[i]:=random(1,1000);

     s:=s+a[i];

   end;

   writeln(s);

 end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Gudimnik1 Gudimnik1  03.08.2019 09:30
Мистер фокс разрабатывает новую компьютерную игру со следующим сюжетом. есть прямоугольник 7$\times$9, в левом верхнем углу которого стоит шахматный конь. игрок должен ввести...
кар92 кар92  03.08.2019 09:30
Вдокументе 14000 символов вместе с пробелами и другими знаками чему равен примерный объем информационный документа . ответ дате в мб...
лерочка345671083 лерочка345671083  02.10.2021 12:01
Написать структурированную программу и доказать ее правильность по определению семантики структурированных программ. Проверить, можно ли в пятеричную запись числа х вставить...
slaider1123 slaider1123  13.09.2019 22:40
Составьте программу которая формирует массив случайным образом из 7 целых чисел принадлежащих промежутку от -5 10 а)поменять местами 6 и 7 элементы. вывести получившийся результат...
mailnadejda mailnadejda  13.09.2019 22:30
1. из 40 учащихся нашего класса 32 любят молоко, 21 – лимонад, а 15 – и молоко, и лимонад. сколько в нашем классе не любят ни молоко, ни лимонад? 2. 12 моих одноклассников любят...
Nera1337 Nera1337  28.07.2019 02:40
Объясните, ниже записан алгоритм. укажите набольшее пятизначное число x, при вводе которого алгоритм печатает сначала 2, а потом 4. var x, y, a, b: longint; begin a : = 0; b...
итлиори итлиори  28.07.2019 02:40
Перевести дату рождения из десятичной системы в двоичную. 1958г 1962г 1982г 1984г 2004г 2014 г 1985г...
bobrovpasha bobrovpasha  28.04.2021 18:57
1. Покажи пути распространения вирусов. Отметь правильные ответы. Носители информации Интернет о Компьютерные программы Принтер, сканер и др. Браузеры Компьютерные сети...
missaki999 missaki999  28.04.2021 18:57
Создание 3 Массивов 1 Фамилия 2 Имя 3 Год Переменные...
1234567898642 1234567898642  25.06.2019 05:20
Какой материк расположен во всех типах климатических поясов? !...

Популярные вопросы