Решите пожалуйста на Паскаль. С клавиатуры вводится целое положительное число N от 3 до 15. Построить квадратную матрицу размерностью NxN и заполнить случайными целыми числами.
More Questions From This User See All
Copyright © 2025 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Verified answer
Program n1;
var a: array[1..15,1..15] of integer;
i,n,j: integer;
begin
randomize;
write('n=');
readln(n);
for i:=1 to n do
for j:=1 to n do
a[i,j]:=random(20);
for i:=1 to n do
begin
for j:=1 to n do
write(a[i,j],' ');
writeln;
end;
end.