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