Регистрация
ПрофессорДикинсон
24.01.2023 23:27
Информатика
Есть ответ 👍

задание с пояснением а 2 и 3 просто ответ

165
449
Посмотреть ответы 1

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

Oho9
Oho9
4,4(91 оценок)
Const   n = 50; // количество элементов массиваvar   a: array [1..n] of integer;   i, sum: integer;   cr: real; // среднее арифметическоеbegin   for i : = 3 to n do       a[i] : = random(1000);   // диапазон рандомных чисел   readln(a[1]);   // 1 элемент массива   readln(a[2]);   // 2 элемент массива   for i : = 1 to n do       sum : = sum + a[i];   cr : = sum / n;   writeln(a);   writeln(sum);   writeln(cr); end.

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