• Помогите решить задачу на массивы,любую!!!
    1.Найти сумму элементов в каждом столбике массива MxN, элементы которого задаются датчиком случайных чисел на интервале [-19;20]
    2.Найти наименьшее четное число в матрице размером MxN, элементы которого задаются датчиком случайных чисел.

Ответы 1

  • 1)uses crt;constn=5;m=7;vari,j,s:integer;a:array[1..n,1..m]of integer;    begin       randomize;       clrscr;                    for i:=1 to n do                      begin                              for j:=1 to m do                                    begin                                                a[i,j]:=random(40)-19;                                                 write(a[i,j]:4);                                    end;                               writeln;                      end;writeln;          for j:=1 to m do                      begin                               s:=0;                                  for  i:=1 to n do                                            s:=s+a[i,j];                                writeln ('j:',j,' ', s);                        writeln;                  end;end.
    • Автор:

      amani
    • 5 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years