👤
a fost răspuns

Se da n numar natural si n numere intregi.Sa se determine suma numerelor pare.DAU COROANA.

Răspuns :

ENCARAJASLAVIK814

Răspuns:

Program P1;

var n,b: Integer;

begin

readln(n);

while ( n <> 0 ) do

begin

if n mod 10 mod 2 = 0 then

b:= b + n mod 10;

n:= n div 10;

end;

write( 'Suma este ' ,b);

end.

Vă mulțumim că ați ales să vizitați site-ul nostru dedicat Informatică. Sperăm că informațiile disponibile v-au fost utile. Dacă aveți întrebări sau aveți nevoie de asistență suplimentară, vă rugăm să ne contactați. Revenirea dumneavoastră ne va bucura, iar pentru acces rapid, nu uitați să ne salvați la favorite!


En Trainingsy: Alte intrebari