Программа.Матрица. Паскаль.как получить матрицу такого вида в паскале? 1 1 1   1    1...
 1 2 3   4    5 ...
 1 3 6   10  15...
 1 4 10  20  35...
 ...
 
1 столбик и первая строчка равны 1последующ. получаются путем сложения верхнего и стоящего слева цисел...
 

Есть ответ
18.12.2022
287

Ответ


(делаю масив 10на10)  

program Matrix;

var a:array [1..10,1..10] of integer;

i,q,b,f:integer;

begin

b:=0; f:=0; q:=1; 

for i:=1 to 10 do begin a[i,q]:=1; end;

i:=1; 

for q:=1 to 10 do begin a[i,q]:=1; end; 

for i:=2 to 10 do

begin

for q:=2 to 10 do

begin 

b:=q-1;

f:=i-1; 

a[i,q]:=a[i,b]+a[f,q];

end; end;

readln

end. 

 


Если вы нашли правильное решение, вы можете поблагодарить нас начиная с 10 рублей.
Просто нажмите на кнопку "Подарить".
18.12.2022
Этот сайт использует cookies (Политика Cookies). Вы можете указать условия хранения и доступ к cookies в своем браузере.