Informatică, întrebare adresată de Adolf, 9 ani în urmă

Un program Pascal care sa calculeze suma cifrelor pare dintr-un numar, utilizand(obligatiriu) functia.(ca in screenshot).

Anexe:

Răspunsuri la întrebare

Răspuns de stassahul
1
function sum(n:integer):integer;
begin
 while(n<>0) do
  begin
   sum+=n mod 10;
   n:=n div 10;
  end;
end;

var

 n:integer;
 
begin

 read(n);
 write(sum(n));

end.
Alte întrebări interesante