Array pascal

Program Array2D;
uses crt;
var 
    row, column : integer;
    i, j : integer;
    A : array[1..100,1..100] of integer;
    
begin
Write('Row = ');ReadLn(row);
Write('Column = ');ReadLn(column);
    for i:= 1 to row do
    begin
        for j := 1 to column do
        begin
            WriteLn('row, column : ', i,',',j);
            readln(A[i,j]);
        end;
    end;

    writeln(' Input Result ');
    for i:= 1 to row do 
    begin
        for j := 1 to column do
            write( A[i,j]:5 );
            writeln();
    end;
end.

Similar codes

0 vote200 views1 answer
Pascal area of triangle
Pascal
8 votes205 views1 answer
Pascal casing
Pascal
0 vote199 views4 answers
Pascal cheat sheet for programmers
Pascal
0 vote209 views1 answer
Pascal special characters
Pascal
0 vote206 views2 answers
Kth Row Of Pascal's Triangle
Pascal
0 vote190 views1 answer
Pascal area
Pascal
2 votes198 views1 answer
Pascal online compiler
Pascal
0 vote206 views1 answer
Contoh dasar pascal
Pascal
0 vote204 views10 answers
Pascal cheat sheett
Pascal
0 vote188 views1 answer
Pascal cheat sheet pdf
Pascal