ציטוט:
נכתב במקור על ידי דור בן עמי
אתה צריך לעבור עם לולאה 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.