02-05-2007, 14:36
|
|
|
|
חבר מתאריך: 03.06.06
הודעות: 699
|
|
עזרה בשאלה בפסקל
שלום..
הייתה לי מתכונת אתמול בפסקל, וקיבלתי שאלה ממש קלה לידיים, ששווה 15 נקודות, אבל כמו אידיוט לא שמתי לב כמה שהיא קלה ופתרתי אותה בדרך קשה וכנראה גם לא נכון=\...
מי שמכיר פסקל אז היה צריך לקלוט פשוט מספר משתנים ולבצע בהם פעולות ותנאים וזהו. אני ברוב טיפשותי עשיתי רשומה למרות שאני לא הכי טוב בזה ועכשיו אלוהים יודע כמה אני יקבל במקום 15 על התרגיל המעאפן הזה.
בכל אופן אני מצרף את התרגיל והנה הפתרון שלי, תגידו לי אם יש אפשרות שאני לא יקבל 0 על התרגיל הזה בעעעעעע........
program targil 7;
type
a_type=record
Aname:string;
weight: real;
legsN:integer;
end;
zman100,gova,gil.rohak,rosh:real;
arr_a_type=array[1..n] of a_type;
var
a:arr_a_type;
while (a[i].weight * a[i].legsN) > 1000 do
writeln ('לא מתקבלת');
else
readln (zman100);
if zman 100>=15 then
writeln ('החיה לא מתקבלת');
else if zman100<15 then
readln (rohak,gova,rosh);
if (rohak>3) and (gova>2) (rosh>2.5) then
writeln ('התקבלה');
סעיף 3 סתם הוספתי איזה משהו ובסעיף 1 רשמתי שחיה שמעמדה לא ברור היא חיה אשר עשתה את הריצה ה100 מטר בפחות מ15 שניות
לא עברה את כל שלושת המבחנים האחרים...
נו עד כמה זה גרוע?
_____________________________________
http://dinozaur1.blogspot.com/
הפורטפוליו שלי...
|