👤

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 pentru vizita pe site-ul nostru dedicat Informatică. Sperăm că informațiile prezentate v-au fost utile. Dacă aveți întrebări suplimentare sau nevoie de ajutor, vă rugăm să ne contactați cu încredere. Așteptăm cu drag să reveniți și nu uitați să ne salvați în lista dumneavoastră de favorite!


En Studentsy: Alte intrebari