Toplam 1 adet sonuctan sayfa basi 1 ile 1 arasi kadar sonuc gösteriliyor
Konu: Banknot Analizi
Hybrid View
-
07.Kasım.2014, 09:05 #1Pro Üye
- Üyelik tarihi
- 06.Kasım.2014
- Mesajlar
- 405
Banknot Analizi
Banknot Analizi
Delphi'de girilen muazzam miktarda paranın analizini yapan bir program
Kod:
program para_analizi;
{$APPTYPE CONSOLE}
type
dizi1=array[1..7] of integer;
dizi2=array[1..7] of string;
var
para1:dizi1=(200,100,50,20,10,5,1);
para2:dizi2=('ikiyuz','yuz','elli','yirmi','on','b es','bir');
netucret,i,tamsayi:integer;
begin
write('Lutfen Net Ucreti TL Cinsinden Giriniz:');
readln(netucret);
writeln;
for i:=1 to 7 do
begin
tamsayi:=trunc(netucret/para1[i]);
netucret:=netucret-tamsayi*para1[i];
if tamsayi>0 then
begin
writeln(tamsayi,' ','adet',' ',para2[i],'tl');
end;
end;
readln;
end.
Delphi Pascal tabanlı olmasına rağmen bu kodları düzgün bir şekilde kabul etmeyecektir. Bu kodlar sadece Pascal ortamında çalışır. O yüzden derste bu kodların aslında Pascal diline yönelik olması belirtilmelidir.
Konu Bilgileri
Bu Konuya Gözatan Kullanıcılar
Şu anda 1 kullanıcı bu konuyu görüntülüyor. (0 kayıtlı ve 1 misafir)
Benzer Konular
-
Linux Yaz Kampında Bro ve Tshark ile Trafik Analizi
Konu Sahibi erkolay Forum Linux GünlükleriCevap: 0Son Mesaj : 20.Ağustos.2015, 12:20 -
Nesnelerin internetinin bir adım ötesi; nesnelerin analizi
Konu Sahibi erkolay Forum İnternetCevap: 0Son Mesaj : 16.Haziran.2015, 23:09 -
Captcha ve Captcha'nın OCR ile Analizi
Konu Sahibi kazanova21641 Forum Webmaster DünyasıCevap: 0Son Mesaj : 01.Haziran.2015, 14:16 -
Yandex Bağlantı Analizi Seo
Konu Sahibi WeBMasteR Forum SeoCevap: 0Son Mesaj : 25.Mayıs.2014, 14:30 -
Yandex Bağlantı Analizi Seo
Konu Sahibi WeBMasteR Forum SeoCevap: 0Son Mesaj : 13.Mayıs.2014, 21:30
Shopsocks5 - Service Socks5 Cheap...
15.Nisan.2024, 14:48 in Güvenlik