اكتب برنامج باستخدام لغة البرمجة باسكال pascal لإیجاد مجموع الأعداد من 1 إلى 10 باستخدام جملة REPEAT

  • برمجة باسكال pascal

اكتب برنامج باستخدام لغة البرمجة باسكال pascal  لإیجاد مجموع الأعداد من 1 إلى 10 باستخدام جملة REPEAT

الأجوبة

program n1(i,o);
var i,sum: integer;
begin
i:=1;
repeat
sum:=sum+i;
i:=i+1;
until (i>10);
 writeln('sum=',sum:4);
readln;
end. 
هل كان المحتوى مفيد؟

تبحث عن مدرس اونلاين؟

محتاج مساعدة باختيار المدرس الافضل؟ تواصل مع فريقنا الان لمساعدتك بتأمين افضل مدرس
ماهو التخصص الذي تبحث عنه؟
اكتب هنا...