Jak sprawdzić czy liczba jest parzysta

program parzysta_liczba;
uses crt;
var liczba:integer;

begin
write('Program sprawdza czy podana liczba jest parzysta');
writeln;
writeln;
write('Podaj liczbę: ');
readln(liczba);
if liczba mod 2=0 then writeln('Liczba jest parzysta')
else writeln('Liczba nie jest parzysta');
readln;
end.

Komentarze

Popularne posty z tego bloga

phpBoard

Turbo pascal - Program sortujący liczby rosnąco

Jak poznać numer ID ostatnio dodanego rekordu do bazy danych MySQL