اكتب برنامج یقوم باستقبال 10 أعداد ثم یقوم بحساب اكبر قیمة وطباعتھا باستخدام جملة FOR

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

اكتب برنامج باستخدام لغة البرمجة باسكال pascal یقوم باستقبال 10 أعداد ثم یقوم بحساب اكبر قیمة وطباعتھا باستخدام جملة FOR 

الأجوبة

program exe21(i,o);
var i,max,x: integer;
begin
max:=0;
for i := 1 to 10 do
readln(x);
if (x>max ) then
max:=x;
write(max:4);
readln;
end
هل كان المحتوى مفيد؟

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

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