Нужно написать программу к данной матрице.
10-11 класс
|
Const NN=30;
var
a:array [1..NN,1..NN] of integer;
i,j,n,k:integer;
begin
write('Введите N: ');
readln(n);
for j:= 1 to n do
begin
k:=1;
for i:= j to n do
begin
a[i,j]:=k;
a[j,i]:=k;
inc(k);
end;
end;
for i:= 1 to n do
begin
for j:= 1 to n do write(a[i,j]:3);
writeln;
end;
end.
Ребят,помогите пожалуйста:)
Другие вопросы из категории
Дано гипотенузу и катет прямоугольного треугольника. Найтдите второй катет и площадь вписанного круга.
Читайте также
13.
Нужно написать программу на цикле с предусловием, на Паскале.
оказаться)
нужно написать программу на c++
Используя обращения 1) по индексу и 2) по указателю.
рдинат. Я поняла, что нужно найти их длины (формулы я знаю), а правильно написать программу не могу
порядка n(n=5).
Если в данной матрице a нет отрицательных элементов,
то транспонировать её, иначе выдать сообщение.
2. Дан код символа. Написать программу, выводящую сам символ.
3. Написать программу для вывода на экран всех маленьких латинских букв.