Есть ответ 👍

Написать программу, которая находит сумму и среднее арифметическое элементов с n1 до n2 одномерного массива, заполненного случайным образом. номера элементов n1, n2 вводятся с клавиатуры. необходимо вывести исходный одномерный массив, а затем сумму и среднее арифметическое элементов введенного диапазона.

192
482
Посмотреть ответы 2

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

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.

Var st: string; begin  write('строка:   ');     readln(st);   repeat    delete(st,1,1);     writeln(st);   until length(st)< 2; end.

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