Сформировать массив из 28 случайных элементов, величина которых лежит в пределах от 2 до 12. найти и вывести на экран среднее арифметическое элементов массива.
Интернет в России появился в 1990 году, тогда же был зарегистрирован и домен su. Обычно историю зарождения русскоязычной части Интернета (Рунета) описывают следующими основными вехами: 22 августа 1990 года – научная сеть Института атомной энергии и ИПК Минавтопрома впервые подключилась к Интернету, поэтому этот день считается днем зарождения русского Интернета.19 сентября 1990 года – первый домен Советского Союза .su был зарегистрирован в международной базе данных.7 апреля 1994 года - первый домен Российской Федерации .ru был зарегистрирован в международной базе данных.
Var a, b: array[1..10] of integer; i, min, max, sum: integer; begin min := 10; for i := 1 to 10 do begin write('Введите ',i,'-ый элемент первого массива '); Readln(a[i]); write('Введите ',i,'-ый элемент второго массива '); Readln(b[i]); if a[i] < min then min := a[i]; if b[i] > max then max := b[i]; end; for i := 1 to 10 do write(a[i], ' '); Writeln; for i := 1 to 10 do write(b[i], ' '); writeln; writeln('Минимальное первого массива ', min); writeln('Максимальное первого массива ', max); sum := min + max; for i := 1 to 10 do if (i mod 2) = 0 then a[i] := sum else b[i] := sum; for i := 1 to 10 do write(a[i], ' '); Writeln; for i := 1 to 10 do write(b[i], ' '); end.
#include <iostream>
using std::cout;
using std::endl;
#include <cstdlib>
using std::rand;
using std::srand;
#include <ctime>
using std::time;
int main()
{
int a[28];
double average = 0;
srand(time(0));
for(int i = 0; i < 28; i++)
{
a[i] = rand() % 11 + 2;
average += a[i];
cout << a[i] << ' ';
}
cout << endl;
average /= 28;
cout << "Arithmetic mean = " << average << endl;
return 0;
}