اكتب برنامج باستخدام لغة البرمجة باسكال pascal باستخدام جملة WHILE یقوم بإدخال 10 أعداد ثم یطبع المتوسط لھذه الأعداد
- برمجة باسكال pascal
- 2021-10-18
- mhanasmh00489829403
الأجوبة
program n1(i,o);
var i,num,sum: integer;
avg:real;
begin
i:=1;
while i<=10 do
begin
readln(num);
sum:=sum+num;
i:=i+1;
end;
avg:=sum/i;
writeln('average=',avg:4:2);
readln;
end.أسئلة مشابهة
القوائم الدراسية التي ينتمي لها السؤال
معلومات ذات صلة