Autor Wiadomość
isar
PostWysłany: Nie 14:21, 03 Lut 2008    Temat postu: Początki-ciąg dalszy ( IF - ELSE)

skoro znamy juz podstawy, przejdzmy do instrukcji warunkowej IF-ELSE

instrukcja ta wyglada tak:

IF warunek THEN dzialanie
ELSE dzialanie ;

srednik dopiero na koncu wpisujemy.

a wiec prosty program mowiacy ktora liczba jest wieksza:

PROGRAM drugi ;
var a , b : integer ;
BEGIN
writeln('podaj pierwsza liczbe');
readln(a);
writeln('podaj druga liczbe');
readln(b);
IF a>b THEN writeln('A jest wieksze od B')
ELSE writeln('B jest wieksze');
readln;
end.

niby proste ale IF - Else bardzo sie przydaje Wink

mozemy tez zastosowac dwa IF:
IF a>b THEN writeln('a jest wieksze od B');
IF b>a THEN writeln('b jest wieksze od a');

ale co jesli te 2liczby sa rowne? wystarczy dodac jedna linijke ktora nam rozwiarze taki problem:)
a wyglada to tak:

IF a>b THEN writeln('a jest wieksze od b')
else
IF a=b then writeln('A wynosi tyle samo co B')
else writeln('b jest wieksze od a');

srednik dajemy na koncu, bo dopiero tam konczy sie instrukcja:)

Powered by phpBB © 2001, 2005 phpBB Group