Programlama | Programlama Dilleri | C Programlama Dili |C++

Hata
  • XML Parsing Error at 1:82. Error 9: Invalid character
´╗┐

Kare Matriste Ters K÷?egendeki Elemanlar Toplam?

Pascal programlama dilinde yaz?lm?? bu programda kullan?c?dan al?nan kare matrise ait elemanlardan ters k÷?egen elemanlar?n?n ( sa? Řst k÷?eden sol alt k÷?eye olan) toplam?n? hesaplayan bir i?lem yap?lm??t?r.

Program Kodu:

Ír:

4

5

6

1

2

3

5

6

7

matrisi išin ters k÷?egen elemanlar? toplam? 11 dir.

  1.  
  2.  
  3. uses crt;
  4. var
  5. tablo :array [1..100,1..100] of integer;
  6. i,j,m,say :integer;
  7.  
  8. procedure ters_kosegen;
  9. begin
  10. for i:=1 to m do
  11. áfor j:=1 to m do
  12. á read(tablo[i,j]);
  13.  
  14. readln;
  15. say:=0;
  16. for i:=1 to m do
  17. áá say:=say+tablo[i,m-i+1];
  18.  
  19.  
  20. begin
  21. clrscr;
  22. writeln('Kare matris satir sayisini giriniz.. : ');
  23. readln(m);
  24. writeln('Tablo degerlerini giriniz.. : ');
  25. ters_kosegen;
  26. writeln('Ters kosegen degerleri toplami.. : ',say);
  27. readln;
  28.  
  29.  

Yorumlar (0)
Sadece kay─▒tl─▒ kullan─▒c─▒lar yorum yazabilir!
Son G├╝ncelleme ( Cuma, 03 A─čustos 2012 18:34 )  
am─▒n─▒za koyay─▒m am─▒n─▒za koyay─▒m am─▒n─▒za koyay─▒m am─▒n─▒za koyay─▒m am─▒n─▒za koyay─▒m am─▒n─▒za koyay─▒m