مشکل در یک پروژه دانشجویی

[pcsoft]

سلام بر دوستان برنامه نویس.. خسته نباشید..
امسال در دانشگاه ما زبان پاسکال، خداقل این ترم درس دادن..
استاد هم یک پروژه برای ترم خواسته که درباره اطلاعات چند دانشجو هستش که تا سقف 100 نفر می تونن باشن و برنامه نمره 3 درس آنها رو می گیره و معدل خود دانشجو ها و همچنین معدل هر درس در کلاس را چاپ می کند مثل یه بانک اطلاعاتی و من هم برنامه رو کامل نوشتم
فقط یه مشکلی دارم باهاش:
وقتی معدل یک دانشجو چاپ می شود معدل بصورت نماد عملی و اعشاری چاپ می شود.
مثلا معدل دو نمره 20 و 12 را اینطور چاپ می کند
1.60000E +01
من آرایه هام رو همه رو به جز شماره دانشجویی و نام خانوادگی از نوع Real تعریف کردم..
اگه از نوع Integer تعریف کنم، مقدار هارو تقسیم نمی تونم بکنم.
لطفا کمکم کنین تا عدد رو بصورت صحیح چاپ کنم
ممنون

[AliReza Vafakhah]

اگه از نوع Integer تعریف کنم، مقدار هارو تقسیم نمی تونم بکنم.

از div استفاده کنید

[vcldeveloper]

مثلا معدل دو نمره 20 و 12 را اینطور چاپ می کند
1.60000E +01

فرمت نمایش اعداد اعشاری را می تونید با استفاده از توابع write و writeln خودتان تغییر بدید، مثلا بکنیدش 2 رقم صحیح و 2 رقم اعشار:

var

  Avg : Real;

begin

  Avg := (20+12)/2;

  Writeln(Avg:2:2);

  Readln;

end.