Ввід та вивід значень елементів двомірного масиву Ввід значень елементів двомірного масиву

Задача. Ввести з клавіатури комп’ютера значення елементів двомірного масиву a[m,n], що складається з m стрічок та n стовпчиків.

Під m та n розуміють довільні (але такі, що відомі) цілі числа. Значення самих елементів масиву – довільні дійсні числа. Наприклад, для m=2, n=3 масив а може виглядати так:

Програма вводу значень елементів двомірного масиву.

program VvDvMas;

uses

Crt;

Var a:array[1..10,1..20] of real;

m,n,i,j:integer;

begin

ClrScr;

{Ввiд двомiрного масиву a розмiром m*n}

Writeln('Ввести кiлькiсть стрiчок m<=10');

Writeln(' та кiлькiсть стовпчикiв n<=20');

Readln(m,n);

Writeln('Ввести по стрiчках даний’,

‘ двомiрний масив:');

For i:=1 to m do

Begin

For j:= 1 to n do Read(a[i,j]);

Readln;

End;

{...}

Readln;

end.