yararlı bi dküman tşkler paylaşım için...

begin aynı sorun bende de oluyor.. cevap verilmemiş. cok merak ettim. end.:D

Sie aq sen ne pascal bilionda bide dküman yazıo :D :)

lan ibnetor oku da ğren wallpaper yapmaya benzemez bu :D 1.5 saat uğraştım bunun için teşkür et amk bu yaptıkların sana yol elektrik ve su borusu olarak geri dnecek :D

eline sağlık hocam.. devamı beklenir hani :D

PASCAL Dkümanımı, daha nce hiç "programlama" szcüğünü duymamış birine yazar gibi yazıcam ki hiçbir yanlış anlama-anlayamama gibi durumlar olmasın.. EDEBİYAT BLÜMÜ İlk olarak programlama nedir? programlama dili nedir neye yarar? Bilgisayar kullanırken birçok programa ihtiyaç duyarız. rneğin müzik dinlemek için winamp, video izlemek için windows media player vs gibi programlar kullanırız. Bunların yanında daha küçük çaplı programlar da vardır; telefon rehberi oluşturma, hesap makinesi vb basit programlar.. Pascal dilini kullanarak büyük çaplı olmasa da küçük programlar yazabiliriz.. Programlama diline neden ihtiyaç duyarız? Arkadaşlar bir ingilizle konuşabilmek için İngilizce bilmeniz gerekir, aynı şekilde bir rusla konuşa bilmek için Rusça bilmelisiniz, pascalda program oluşturabilmek için de pascal programlama dilini bilmeniz gerekir, aksi takdirde bilgisayar sizin ne yapmak istediğinizi anlayamaz. PROGRAMLAMA BLÜMÜ Evet şimdi işin nemli kısmına geçiyoruz. Pascal dili ile çok geniş içerikli programlar yazamasak da yeni başlayanlar için idealdir. İlk olarak kendimize bir derleyici bulmamız gerekiyor. Ben size devpascal programını tavsiye ederim. Programı aşağıdaki linke tıklayarak indirebilirsiniz. http://rapidshare.com/files/23779250/devpas192. rar.html Pascalda programa derdimizi kodlarla anlatırız. İlk olarak şu hatırlatmayı yapıcam, eğer devpascalı kurduysanız ve dkümandaki programları deneye deneye gidiyorsanız şunu unutmayın, pascal sayfasına kodları yapıştırdığınızda nce save edip ardından yukarıdaki yeşil ok tan compile edip onun yanındaki zımbırtıya basmanız gerekir programı grebilmek için, hatta ben size resim de koyayım; http://img186.imageshack. us/my. php?image=pascaldokumanxq0ds8. jpgBen direk kodlara giriş yapıcam artık biraz kafanızı yorup anlamaya çalışmanız gerekmekte. En basitinden bir programla başlayalım. not: pascalda Türkçe karakter kullanmamalısınız, bazen sorunlara yol açabilir, ayrıca dkümanda kod yazarken yanlışlıkla Türkçe karakter kullandıysam siz onları düzeltin programı kullanırken.. Program 2kati; var abc:integer; begin writeln ; readln ; writeln('Yazdiginiz sayinin iki kati ', abc 2,' dir'); readln; end. size tavsiyem şudur ki; nce yukarıdaki programı devpascalda çalıştırıp kullanın ve ardından aşağıdaki kısma geçin, neyin neye yaradığını daha rahat anlarsınız. Şimdi size buradaki ğeleri tek tek tanıtacağım; En başta "program 2kati;" yazıyor. Bu, programınıza verdiğiniz ismi belirtir. Onu yazmasanız da olur. Ama iyi bir programcı eserini isimsiz bırakmaz ;)"var" szcüğü altında kullanıcının yazacaklarının sayı mı yoksa yazı mı olduğunu belirtiriz, biz orada abc:integer; demişiz, orada integer sayı anlamına gelir, yani bunu yaptığımızda program abc verisiyle karşılaştığında onun sayı olduğunu anlıyacaktır. Gelelim programın iskeletine;Programın iskeleti begin-end szcükleri arasındadır. Begin <KOD KOD KOD KOD KOD> End. Şeklinde kullanılır. Begin ile End. Arasında yazdığımız kodlar programın kullanıcıya gsterilecek kısmını oluşturur."writeln" kodunu kullanarak belirlediğimiz cümleyi programda yazdırırız. "readln" kodunu yazdığımızda ise sz hakknı kullanıcıya vermiş oluruz, orada readln ; şeklinde yazmışım, burada parantez içinde "abc" yazmam, kullanıcı bir sayı yazdığında program o sayıyı hafızasına abc olarak kaydetmesine yarar. Çünkü kullanıcının ne yazacağını nceden bilemeyiz ve bu şekilde belirleyebiliriz. Dolayısıyla kullanıcımız sayıyı yazıp enter a bastığında onu 2 ile çarpma imkanımız olur, devam edelim; writeln('Yazdiginiz sayinin iki kati ', abc 2,' dir'); demişiz. Burada writeln kodu gene bizim ekrana yazı yazdırmamızı sağlıyor, fakat ilk cülemizden biraz daha farklı; ', abc 2,' diye bir blüm var, kullanıcımız sayı olarak eğer 5 girdiyse, programımızda "Yazdiginiz sayinin iki kati 10 dir" şeklinde gzükecektir. Yani ', ,' ayraçları arasındaki blüm zerk blümdür burası işlem için kullanılır, abc çarpı 2 demişiz orda zaten o blüme o işlemin sonucu yazılarak programa yansır. Devam edelim, end. deyip bitirmeden nce readln; kullanmışız tekrar, bunun nedeni şudur ki; programın sonlandırılması için kullanıcıya hak tanıyoruz. Eğer o readln; yi koymazsak kullanıcı sayısını girdiğinde iki katı hemen gzükür ve saniye içinde program kapanır, bu yüzden her zaman kapatma hakkını kullanıcıya vermeliyiz, ve end. den nce mutlaka readln; yi kullanmalıyız. Kullanıcı entera bastığında program kapanacaktır yle bir durumdaŞimdi bazı püf noktalardan bahsedeceğim.. Programda her satırın sonuna ; getirilir. Aşağıdaki kodları tekrar inceleyiniz. Program 2kati; var abc:integer; begin writeln ; readln ; writeln('Yazdiginiz sayinin iki kati ', abc 2,' dir'); readln; end. Fakat kesinlikle begin, var, end gibi kodların sonuna ; getirilmez. Eğer sadece okumak yerine bu kodları programa yapıştırıp da incelerseniz daha rahat ğrenirsiniz. Başka bir ipucu; yazacağınız cümle writeln ; Şeklinde yazılır. Yani nce writeln yazarsınız parantez açarsınız sonra ' koyarsınız sora yazınızı yazar ardından gene ' koyar ve parantezi kaparsınız sonuna da ; koymayı ihmal etmeyin. Bunu ble ayrıntılı gstermemin nedeni üstteki kodların arasında gzden kaçabilecek olması. Gelelim diğer bir ip ucuna, writeln diyoruz da neden write demiyoruz, buradaki ln, enter grevi taşır. Yani eğer siz ln kullanmazsanız programı açtığınızda "bir sayi yaziniz" yazar Sonra diyelim ki 20 yazdınız, o da "yazdığınız saynın iki kati 40 tir" dedi. Bütün bunlar şu şekilde grünür: "bir sayi yaziniz20yazdiginiz sayinin iki kati 40 tir" gibi.. Bu yüzden ln kullanmaya zen gsterin. Ve en son olarak "end." e gelelim, end. Kodu programın bittiğini gsterir. Bunu yazdıktan sonra artık başka kod yazılmaz, yani en sona yazılır :) end ve nokta yani end. Şeklinde yazmalısınız aksi takdirde sorun çıkabilir. Son olarak bir şeyden bahsedicem mesela kullanıcının tanımladığı bir şeyi 5 ile çarpacaksınız, abc gibi, o zaman cümlenin içinde ayrıca ', abc 5, ' kalıbını kullanmanız gerekir yukarıda da bahsettim gerçi ama, benim orda yazdığım ', abc 5, ' in anlamı, diyelimki kullanıcı 20 yazdı 20 5 anlamına gelir, işareti burada çarpı işareti yerine kullanılır. İlla 2 katını ya da 5 katını alcaksınız diye bir şey yok 5 fazlasını da alabilirsiniz, karesini de. O zaman şyle yazarsınız: writeln('yazdiginiz sayinin 5 fazlasi ', abc+5, ' dir'); şeklinde de yapabilirsiniz. Ya da karesini almak için writeln ; şeklinde de yapabilirsiniz. Şimdi başka bir program rneğiyle devam edelim.. Program tanisma; Var isim:string; begin writeln('Merhaba benim adım Cold-m4, senin adin nedir? '); readln ; writeln ; readln; end. Burada başka bir yapıyı string i kullandık, string burada kelime, ya da yazı anlamına gelir. Yani bir şeyi string olarak tanımladığımızda programımız kullanıcının rakam veya sayı değil de kelime yazacağını bilir ona gre işlem yapar. ilk olarak "isim" szcüğünü string olarak belirledik, ardından da readln ; kalıbını kullanarak kullanıcının girdiği ismi programımızın yakalamasını sağladık. fark ettiyseniz burada da ', ,' yapısını kullandık, ', isim,' şeklinde yazdığımızda kullanıcı isim blümüne ne yazdıysa bu yapıda da o çıkar. Peki şyle yapabilirmiydik diye sorabilirsiniz, writeln ; şeklinde yapamazdık, çünkü o zaman program neyden bahsettiğimizi anlamaz ve ekrana "memnun oldum isim" yazardı. Bu yüzden ', ,' ayraçlarının nemi büyüktür. Şimdi biraz daha ilerletelim isterseniz, daha geniş çaplı bir program yazalım, fakat eğer elinizde devpascal yoksa kesinlikle okuyarak geçmeyin buradaki her programı pascala yapıştırıp çalıştırın. Bol bol deneyin kendiniz de değişiklikler yapın mesela ben orda writeln ; dedim ama siz writeln ; şeklinde veya daha değişik bi şekilde değiştirebilirsiniz ayrıca sadece bir cümle yerine birkaç cümle üst üste yapabilirsiniz, zekanızı zorlayın. Neyse programımıza geçiyoruz. Program chat; Var isim:string; yas:integer; begin writeln('Merhaba ben cold-m4, ya sen kimsin bilader?'); readln ; writeln ; readln ; writeln ; readln; end. Arkadaşlar şimdilik verebileceklerim bu kadar, çok kısa bir süre içinde ikinci bir dkümanla birlikte olacağız, verdiğim kodları kullanarak ve işe zekanızı da katarak daha ilginç şeyler türetebilirsiniz, Son olarak bi hatırlatma yapıcam diyelimki birden fazla sayı veya isim kullanıcaz, o zaman şyle yapıcaksınız, Var Sayi1, sayi2, sayi3:integer; isim1, isim2, isim3:string; şeklinde birçok isim ve sayı kullanabilirsiniz.. Ha bu arada son hatırlatma, programı yazıp masaüstüne kaydedip compie ettiniz yeşil şeyden ondan sonra onun yanındaki run project'e basıp programı çalıştırdığınızda programınız masaüstünde exe halinde belirecektir, nereye kaydettiyseniz orada belirir. Takıldığınız ve sormak istediğiniz bir şeyler olursa msn adresim: cold-m4@msn.com 23 saat açık.. Umarım yararlı olmuştur, Sevgilerle :)

ilk mesaj editlenmediği için dkümanımın devamını bu mesajdan getireceğim..

eywallah kardeş ellerine sağlık ama pascal devri yıllar nce bitti şle c# falan dkümanı falan hazırlasan daha ii olur Doğru kişi olmak meselenin yarısıdır, diğer yarısı; doğru zamanda, doğru yerde, doğru kişilerle karşılaşmış olmanızdır.

dengesiz kardeş o da olur inş c ile aram pek iyi değil ğrenince onu da yazarız ;) pascalla devam etmeyi düşünüyorum bi süre ardından delphi dkümanlarına geçicem

iyi iyi pascal güzeldir hoştur :D dküman iyi gibi tam inceleyemedim ama inceliycem şimdi sırıtma la.

yaben programı indirdimrneklerden denemeye çalıştım save>> check e tıkla yaptığımda nce Resource fileIcon file not found diyor. optionsdan icon yerleştirdiğimde ise cpp: Too many argumentsC:\Dev-Pas\bin\windres: C:\Documents and Settings\sadsad\Desktop\blog\contents\style\rsrc. rc:1: parse error diyor. Sorun nedir? since 2005 // tbt

c/p yaptım, işlerim bittiginde okicam hoca sagol.. ellerine saglık. devamını bekliyoruz :)

paylaşım için saol eline sağlık Bittik biz bittik

cold-m4 bunu yazdı: lan ibnetor oku da ğren wallpaper yapmaya benzemez bu :D 1.5 saat uğraştım bunun için teşkür et amk bu yaptıkların sana yol elektrik ve su borusu olarak geri dnecek :D nie diğer dkümanda elektri ve su borusu yapmayımı ğretcen :D :D eline sağlık uğraşın yeter hajı DAĞDA ÜÇ BEŞ KOYUN SÜRÜSÜ, TUTTURMUŞ BİR KÜRDİSTAN TÜRKÜSÜ, ELİNE ALMIŞ BAYRAK DİYE BİR MASA RTÜSÜ, SATSAN BEŞ PARA ETMEZ NE DİRİSİ NE DE LÜSÜ, SOYU SOYSUZ OLAN SENSİN TOPRAK SENİN NEYİNE, İTE İTLİK YAPIP KAFA TUTMA BEYİNE, ANLASA DEDİĞİMİ SOKAKTAKİ KPEK AĞLAR HALİNE, DUY ULAN SOYSUZ NE MUTLU TÜRKÜM DİYENE...

Eyv güzel dküman, byle konulara bakmak lazım zıplattım.