Klavyeden kitap fiyatı girilip sayısına göre indirim yapan program.

Eşref15.11.2008 - 21:35
Klavyeden kitap fiyatı girilip sayısına göre indirim yapan program.

Kod: [Seç]
uses crt;
var
sayisi:integer;
fiyat:real;
begin
writeln('kitabin_sayisini_giriniz:');readln(sayisi); writeln('kitabin_fiyatini_giriniz:');readln(fiyat); if(sayisi<10)then
begin
fiyat:=sayisi*fiyat;
writeln('fiyati:',fiyat,'YTL');
end
else
if(sayisi>=10)and(sayisi<50)then
begin
fiyat:=fiyat-(fiyat*0.10);
writeln('fiyati:',fiyat);
end
else
if(sayisi>=50)then
begin
fiyat:=fiyat-(fiyat*0.20);
writeln('fiyati:',fiyat,'YTL');
end;
readln;
end.


Linkback: https://www.buyuknet.com/klavyeden-kitap-fiyati-girilip-sayisina-gore-indirim-yapan-program-t8226.0.html

Etiket:

Bu bilgi size yardimci oldu mu?

EvetHayır
Klavyeden kitap fiyatı girilip sayısına göre indirim yapan program.
Klavyeden kitap fiyatı girilip sayısına göre indirim yapan program.
(Ortalama: 5 üzerinden 2.5 - 2 Oy)
2