Prvky na vedlejší diagonále – Delphi – Fórum – Programujte.com

Zdravím,

potřebovala bych poradit, mám program s nadeklarovanu funkcí ciferného součinu (function CS(C:inetger):integer) a potřebuji tímto součinem nahradit prvky na vedlejší diagonále matice. První si tu matice načtu a potom vytvořím druhou, která má právě nahrazeny prvky na vedlejší diagonále jejich ciferným součinem. Měla jsem za to, že napíšu: if j=N-i+1 then A[i,N-i+1]:=CS. Jenže má teorie je špatně, vím že musím první tu matici načíst a až pak to nahradit, ale nemůžu přijít na to jak, přehazuju, přepisuju a pořád nic. Děkuji

a kod programu?

Pokud teda máš původní matici (A) a pak další, ve které mají ty prvky být nahrazené (B), tak to bude asi nějak takto:

if j=N-i+1 then B[i,j]:=CS(A[i,j]);

Těžko říct, kde je problém.

#3 q
Díky moc, přesně tady v tom sem to měla špatně zapsané.