اكتب برنامج باستخدام لغة البرمجة باسكال pascal لقراءة مصفوفة أحادیة البعد مكونة من 20 عنصر وطباعة مجموع عناصرھا

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

اكتب برنامج باستخدام لغة البرمجة باسكال pascal  لقراءة مصفوفة أحادیة البعد مكونة من 20 عنصر وطباعة مجموع عناصرھا

الأجوبة

program Arr(i,o);
var s:Array[1..20] of integer;
 i,sum:integer;
begin
for i:= 1 to 20 do
readln(S[I]);
sum:=0;
for i:= 1 to 20 do
sum := sum+S[i];
for i := 1 to 20 do
write(S[i]:4);
هل كان المحتوى مفيد؟

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

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