[Gil-S]

נכתב במקור על ידי דור בן עמי

אתה צריך לעבור עם לולאה 5 פעמים ולקלוט 5 פעמים.. כל פעם אחרי הקליטה אתה צריך לעשות את התנאי, אם הוא true תדפיס

אם תביא קוד זה מאוד יעזור

מה שאתה אומר זה שאני צריך לעשות read חמש פעמיים?


בכל מקרה, זה הקוד שעשיתי..

program EXA_2;
var
i,zion:integer;
begin
writeln ('Give Zion');
for i:=1 to 5 do
begin
readln (zion);
if zion > 80 then writeln (zion);
end
end.