Răspuns :
var
n:integer;
begin
writeln('Numarul:');
read(n);
if (n mod 2=0) then
writeln('Numarul este par');
else
writeln('Numarul nu este par');
end.
Vă mulțumim că ați ales să vizitați platforma noastră dedicată Informatică. Sperăm că informațiile disponibile v-au fost utile. Dacă aveți întrebări suplimentare sau aveți nevoie de sprijin, nu ezitați să ne contactați. Vă așteptăm cu drag și data viitoare! Nu uitați să adăugați site-ul nostru la favorite pentru acces rapid.