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

Var a:array[1..100,1..100] of integer;                     
            N,M,i,j,min,kmin:integer;
begin
readln(N,M);
min:=10000;
kmin:=0;     
for i:=1 to N do begin           
  writeln();         
      for j:=1 to M do begin           
               a[i,j]:=random(50);
                 write(a[i,j],'  ');         
               if min = a[i,j] then
                            kmin:=kmin+1           
               else if min > a[i,j] then begin
                                        kmin:=1; min:=a[i,j];
                            end;         
          end;     
end;
writeln();
write(min,' ',kmin);
readln();
end.

ответ:1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

19

20

21

22

#include<iostream>

#include<conio.h>

void main()

{

int a;

int m;

puts ("Определение максимального положительного числа\n");

puts ("Вводим числа для завершения введите 0");

m=0;

do

     {

         printf(" | ");

         scanf("%i",&a);

         if (a>m)

              {

                 m=a

               }

      }while(a>0);

printf("Максимальное число :%i",m);

printf("Для завершения введи Enter");

getch();

}

Объяснение: