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

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

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

الأجوبة

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

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

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