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

Anasayfa Programlama Pascal Index Numarası Çift Olan Sayıları Yazdırma


Index Numarası Çift Olan Sayıları Yazdırma

Pascal programlama dilinde yazılmış bu programda index numarası çift olan dizi elemanları bastırılmaktadır. 20 elemanlı bir dizinin kullanıldığı bu programda dizi elemanları konsol üzerinden kullanıcıdan alınmaktadır.

Program  Kodu:

  1. program bst_5_6;
  2. uses crt;
  3. var
  4. i,a:integer;
  5. Dizi2:array[1..20] of integer;
  6.  
  7. begin
  8. writeln('Soru BST_5_6');
  9. for i:=1 to 20 do
  10. begin
  11. readln(a);
  12. Dizi2[i]:=a;
  13. writeln('Dizi : ');
  14. i:=2;
  15. while(i<19) do begin writeln(Dizi2[i]); i:=i+2; end;
  16. readln;
  17.  
  18.  

Yorumlar (0)
Sadece kayıtlı kullanıcılar yorum yazabilir!
Son Güncelleme ( Salı, 11 Ekim 2011 23:41 )