السلام عليكم
احاول عمل برنامج يطبع جميع ال ascii من الصفر الى 255
وبعد البحث علمت ان الدالة chr تترجم زر لوحة المفاتيح الى الى ascii
فما الطريقة لطباعتها جميعا في حلقة تكرار واحدة عن تنفيذ البرنامجاقتباسwrite (chr(a))
كيف اطبع جميع الascii
إذا كنت تبحث عن حلقة التكرار كما قهمت فستكون كالتالي:
var i:integer; begin i:=0; while i<=255 do begin writeln(chr(i)); i:=i+1; end; end;
تم تعديل هذه المشاركة بواسطة imadma في 21 نوفمبر 2011 في 22:41