הייתי צריך לבנות תוכנית הזאת:מחיר כרטיס לבריכה עבור אדם מבוגר עולה 17.5 ועבור כרטיס לילד 12.5
כתוב תוכנית אשר קלט שלה הוא מספר המבוגרים ומספר הילדים והפלט שלה
יהיה הסכום הכולל שיש לשלם עבור כרטיסים אלו.
בניתי את התוכנית הזאת:
program afroman;
var a,b:real;
c,d:integer;
begin
a:=17.5;
b:=12.5;
writeln ('enter the number of the adults');
readln (c);
writeln ('enter the number of the children');
readln (d);
writeln ('you need to pay');
writeln (a*c+b*d);
readln;
end.
ושאני מפעיל את התוכנה אני שם את מספר המבוגרים ואת מספר הילדים ובסכום הכולל זה רושם לי סתם מספר עם מלא אפסים ובסוף את האות E.
משהו יכול להגיד לי מה הבעיה?