Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- const
- n = 5;
- var
- arr: array[1..n, 1..n] of integer;
- i, j, max, min, k, s: integer;
- begin
- randomize;
- for i := 1 to n do
- begin
- for j := 1 to n do
- begin
- arr[i, j] := random(10);
- write(arr[i, j], ' ');
- end;
- writeln;
- end;
- writeln;
- for i := 1 to n do
- begin
- for j := 1 to n do
- write(arr[i, j], ' ');
- writeln;
- end;
- end.
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement