ערכתי לאחרונה בתאריך 27.10.03 בשעה 16:03 בברכה, no_angel
בתוכנית הראשונה לא הבנתי מה לעשות עם המשתנה הגדול אז הדפסתי.
מזמן לא נדעתי בפסקל אבל זה בטוח נכון אולי לא כתבתי נכון איך מספדיסים אבל בטוח תדע .מקווה שעזרתי בתרגיל השני זה ניראה דומה אבל התנאים שונים
program tar1;
Var
a,b,c:integer;
Begin
writeln('insert 3 numbers');
readln(a,b,c);if (a>b) and (a>c)
then writeln{'this is the high'st number',a); if (a<b) and (b>c)
then writeln{'this is the high'st number',b); if (c>b) and (a<c)
then writeln{'this is the high'st number',c); end.
|
תרגיל שני:
program tar2;
Var
a,b,c:integer;
Begin
writeln('insert 3 numbers');
readln(a,b,c);if (a<b) and (a<c)
then writeln{'this is the high'st number',a); if (a>b) and (b<c)
then writeln{'this is the high'st number',b); if (c<b) and (a>c)
then writeln{'this is the high'st number',c); end.
|
גירסת הדפסה
סגן המנהל
מפקח
Winner
צל"ש
מומחה
