انشاء ملف نصي وكتابة عدة سطورفيه
2 مشترك
صفحة 1 من اصل 1
انشاء ملف نصي وكتابة عدة سطورفيه
بسم الله الرحمن الرحيم
انشاء ملف نصي وكتابة عدة سطورفيه
- الكود:
program write_file1_txt;
var ft: text; s: string; i: integer;
begin
assign(ft, 'text1.txt');
rewrite(ft);
for i := 1 to 10 do
writeln(ft, 'Welcome to turbo pascal 7.0 ');
close(ft);
end.
عدل سابقا من قبل mah11 في 6/11/2015, 9:57 am عدل 1 مرات (السبب : تنسيق الموضوع كي يبدو في شكل لائق)
رد: انشاء ملف نصي وكتابة عدة سطورفيه
بــارك الله فـــــــــيك
ali- مبرمج مجتهد
- عدد المساهمات : 913
تاريخ التسجيل : 29/07/2013
مواضيع مماثلة
» انشاء ملف وكتابة معلومات فيه
» انشاء ملف نصي وكتابة سطرين فيه
» خطوات انشاء قاعدة بيانات بمعالج و خطوات انشاء قاعدة بيانات يدويا
» انشاء ملف وتسجيل معلومات فيه
» انشاء مجلد
» انشاء ملف نصي وكتابة سطرين فيه
» خطوات انشاء قاعدة بيانات بمعالج و خطوات انشاء قاعدة بيانات يدويا
» انشاء ملف وتسجيل معلومات فيه
» انشاء مجلد
صفحة 1 من اصل 1
صلاحيات هذا المنتدى:
لاتستطيع الرد على المواضيع في هذا المنتدى