ТутРешу.Ру

Сформировать целочисленный массив

Задание:

Сформировать целочисленный массив (6*6), заполненный случайным образом числами из промежутка [-50; 50] ПАСКАЛЬ! ПОМОГИТЕЕ

Решение:

Program Z1; uses crt; const N=6; var A: array [1… N,1… N] of integer; i,j: integer; beginClrScr; for i: =1 to N dobeginfor j: =1 to N dobeginA[i,j]: =Random (101) -50; write (A[i,j]: 4); end; writeln; end; end.




Знаете другой ответ?

Отправить свой ответ