Se da n numar natural si n numere intregi.Sa se determine suma numerelor pare.DAU COROANA.
carajaslavik814:
in pascal vrei?
Răspunsuri la întrebare
Răspuns de
1
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.
Alte întrebări interesante
Matematică,
8 ani în urmă
Limba română,
8 ani în urmă
Matematică,
8 ani în urmă
Biologie,
8 ani în urmă
Limba română,
9 ani în urmă
Limba română,
9 ani în urmă
Matematică,
9 ani în urmă