Pascal [błąd W Kursie?]

[bjkuba]

Witam mam taki dziwny problem, nie wiem czy coś jest źle w kursie, czy ja coś źle robie.

Więc tak mam kurs Pascal'a i czytam sobie lekcje o IF...THEN...

i jest tam przykladowy program podany z uzyciem ELSE http://turbopascal.skryptoteka.pl/5.html

USES CRT;VARliczba:longint;BEGINclrscr;writeln('Wprowadź jakąś liczbę od 1 do 5');read(liczba);IF liczba=1 THEN writeln('Brawo! Podałeś liczbę 1');IF liczba=2 THEN writeln('Brawo! Podałeś liczbę 2');IF liczba=3 THEN writeln('Brawo! Podałeś liczbę 3')ELSE writeln('Na pewno nie podałeś liczby 1, 2 lub 3');readln;END.

i tu moje pytanie

jeśli wpisze np 4,5 itp jest okej wyskakuje komunikat Na pewno nie podałeś liczby 1, 2 lub 3

jeśli wpisze 3 też jest okej wyskakuje Brawo! Podałeś liczbę 3

ale jeśli wpisze np 1 albo 2 to juz jest źle bo wyskakuje:

Brawo podales liczbe (i tu jeden albo 2)

Na pewno nie podales liczby 1,2 lub 3

i tutaj wnioskuje ze ELSE odwołuje sie tylko do trójki a na stronce jest napisane ze do całości

i tu moje pytanie jak napisac to zeby ELSE łapało całość ?

Edytowane 3 Czerwca 2006 przez bjkuba

[SGJ]

Najlepiej tak

case liczba of   1: writeln('Brawo! Podałeś liczbę 1');   2: writeln('Brawo! Podałeś liczbę 2');   3: writeln('Brawo! Podałeś liczbę 3');  else writeln('Na pewno nie podałeś liczby 1, 2 lub 3'); end;

[koparka]

najmniej zmodyfikowany program wygladalby tak:

<code>

IF liczba=1 THEN writeln('Brawo! Podałeś liczbę 1')

ELSE

IF liczba=2 THEN writeln('Brawo! Podałeś liczbę 2')

ELSE

IF liczba=3 THEN writeln('Brawo! Podałeś liczbę 3')

ELSE writeln('Na pewno nie podałeś liczby 1, 2 lub 3');

</code>

wystarczy dodac 2 else :]

[bjkuba]

wystarczy dodac 2 else :]

o własnie o to mi chodzilo :) dzięki wielkie za pomoc

[PelzaK]

pamiętaj że ELSE tyczy się tylko jednego IFa nad nim....