Ubuntu-gr Forum

saviolidis έγραψε:Παιδιά βοήθεια!!!
Φτιάχνω ένα μικρό πρόγραμμα για το σχολείο αύριο και έχω κολλήσει!
Εδώ είναι ο κώδικας:

Κώδικας: Επιλογή όλων

program vathmologia;
uses crt;
var
student : String;
vathmos : LongInt;
begin
write('Δώσε το όνομα του μαθητή: ');
readln(student);
write('Δώσε την τελική βαθμολογία του μαθητή: ');
readln(vathmos);
if vathmos<10
then begin
writeln('Είσαι κάτω από την βάση!');
if vathmos<9
then begin
writeln('Μάλλον κόβεσαι!');
end
else if vathmos>=9
then begin
writeln('Μάλλον περνάς με τον μέσο όρο!');
end;
end
[b]else if 10<vathmos<15[/b]
then begin
writeln('Καλά τα πήγες αλλά προσπάθησε περισσότερο!');
end
else if vathmos>=15
then begin
writeln('Μπράβο!!!');
end;
end.



Λοιπόν εκεί που έχω κάνει την έντονη γραφή, όταν το κάνω Compile το πρόγραμμα μου βγάζει λάθος...Τι να γράψω για να πω ότι αν ο βαθμός είναι μεγαλύτερος από 10 και μικρότερος από 15 και μπλα μπλα μπλα;...

Κώδικας: Επιλογή όλων


...
else if (vathmos > 10) AND (vathmos < 15) then
...