Var s:intreg;
inceput
citeste(s);
daca s%2=0 atunci
scrie('Numarul este par')
altfel
scrie('Numarul este impar');
sfarsit.
Poramul calculeaza paritatea unui numar. Succes mai departe!
iloveteenwolf întreabă: