👤

De la tastatură se introduce un număr X . Scrie un program Pascal realizînd o procedură care va afişa 0, dacă X este par şi 1-în caz contrar.

Răspuns :

Răspuns:

program par;

var x:integer;

begin

    write('Dati numarul x = ');

    readln(x);

    if x mod 2 = 0 then {numarul este par}

       writeln('O')

    else

       writeln('1');

    readln;

end.

Explicație:

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.


Wix Learning: Alte intrebari