اكتب برنامج باستخدام لغة البرمجة باسكال pascal یقوم باستقبال 5 أعداد ثم یقوم بحساب اكبر قیمة وطباعتھا باستخدام جملة REPEAT
- برمجة باسكال pascal
- 2021-10-18
- mhanasmh00489829403
الأجوبة
program n1(i,o);
var i,x,max: integer;
begin
i:=1;
max:=0;
repeat
readln (x);
if x > max then
max:=x;
i:=i+1;
until (i>5 );
writeln(max);
readln;
end.
أسئلة مشابهة
القوائم الدراسية التي ينتمي لها السؤال
معلومات ذات صلة