Klavyeden girilen ilk ve son sayacın hesaplayan program.

tarantula90115.11.2008 - 21:34
Klavyeden girilen ilk ve son sayacın hesaplayan program.

Kod: [Seç]
uses crt;
var
sonsayac,ilksayac:integer;
elk:real;
begin
write(‘ilk sayacı giriniz:’);readln(ilksayac);
write(‘son saycı giriniz:’);readln(sonsayac);
elk:=sonsayac-ilksayac;
if (elk>150) then begin
elk:=elk-15;
elk:=elk*1.5;
elk:=elk+150;
elk:=elk*1.18*15;


writeln(‘Fatura tutarı:’,elk);
end
else if (elk<=150) then begin
elk:=elk*1.18*15;
writeln(‘Fatura tutarı:’,elk);
end;
readln;
end.




Linkback: https://www.buyuknet.com/klavyeden-girilen-ilk-ve-son-sayacin-hesaplayan-program-t8224.0.html


Etiket:

Bu bilgi size yardimci oldu mu?

EvetHayır
Klavyeden girilen ilk ve son sayacın hesaplayan program.
Klavyeden girilen ilk ve son sayacın hesaplayan program.
(Ortalama: 5 üzerinden 2.5 - 2 Oy)
2