pascal programı yaptım ama değişmesi gereken bir yer var!!!!!

ebedgah20 · 2011-12-07T22:23:38.0000000+03:00

Program ornek6; uses crt; var dosya:text; x:string; begin; assign(dosya,'tahribat.txt'); reset(dosya);{dosyayı okumak için açtık} repeat readln(dosya, x); writeln(x);{okunan bilgiyi ekrana yazdirdik} until eof(dosya);{dosyanin sonuna gelene kadar} close(dosya); readln; end. arkadaşlar program bu ben burda eof un yerine nasıl birşey yazmalıyımki dosyadaki 350 tane karakteri ekrana yazdırsın çok acilllll

Sıcak Fırsatlarda Tıklananlar

Editörün Seçtiği Fırsatlar

TP-Link Tapo T315, Akıllı Sıcaklık ve Nem Monitörü, Ücretsiz Veri Depolama, LCD Ekran, Gerçek Zamanlı Bildirimler, Pil Dahildir, Alexa ve Google Home ile Çalışır, Tapo Hub Gereklidir Ayrıca Satılır : Amazon.com.tr: Bilgisayar https://www.amazon.com.tr/dp/B0BNYSVV3J?ref=ppx_yo2ov_dt_b_fed_asin_title 8 sa. önce paylaşıldı

Acer TravelMate P4 14 (TMP414-53) Dizüstü Bilgisayar, Intel Core i7-1335U İşlemci, Intel UHD Graphics Paylaşımlı Ekran Kartı, 14 inç FHD Ekran, 16 GB DDR4 RAM, 512 GB SSD, FreeDOS, NX.VZTEY.001 : Amazon.com.tr: Bilgisayar https://www.amazon.com.tr/gp/aw/d/B0CPJ76B4Q 6 sa. önce paylaşıldı

Sony WH-CH520 Kablosuz Bluetooth Kulaklık - Hızlı Şarj Fonksiyonlu 50 Saate Kadar Pil Ömrü - Kulak Üstü Model - Siyah : Amazon.com.tr: Elektronik https://www.amazon.com.tr/gp/aw/d/B0BTJD6LCL 6 sa. önce paylaşıldı