1. Ana Sayfa
  2. Bilgisayar
  3. Pascal'da KDV Hesaplama programı

Pascal'da KDV Hesaplama programı

Son güncelleme: 18.03.2010 22:47
fiber_optic fiber_optic foto
  • Uses crt;
    Var
    ad : string[20];
    fiyat :real;
    tfiyat : real;
    Begin
    Clrscr;
    write('Urun İsmi....:');readln(ad);
    write('Fiyatı.....:');readln(fiyat);
    tfiyat:=fiyat*1.15;
    writeln;
    writeln('Ürünün Kdv'li Fiyatı ... : ',tfiyat,'YTL');
    Readln;
    End.
#12.07.2007 08:49 0 0 0
serdar-u serdar-u foto
  • tesekkurler
#15.07.2007 20:20 0 0 0
aacayyip aacayyip foto
  • Teşekkürler arkadaşlar.
    Ellerinize sağlık.
#16.07.2007 12:36 0 0 0
cuka cuka foto
  • TŞK
#29.03.2009 00:57 0 0 0
atakan_0 atakan_0 foto
  • teşekkürle kardeş umarım işimize yarar
#31.08.2009 12:39 0 0 0
avensola avensola foto
  • tesekkürler
#02.09.2009 08:29 0 0 0
MAMDEL MAMDEL foto
  • BAKALIM ÖNCE YİNE DE TŞK EDERİZ
#18.03.2010 22:47 0 0 0