folosind instructiunea "for" parcurgeti nr de la 1 la 20 si calculati suma nr. pare
geniusturkey99:
Care e instructiunea "for" ?
Răspunsuri la întrebare
Răspuns de
0
var i,p:byte;
begin
for i:=1 to 20 do if i mod 2 = 0 then p+=i;
Writeln('Suma numerelor pare: ',p);
end.
begin
for i:=1 to 20 do if i mod 2 = 0 then p+=i;
Writeln('Suma numerelor pare: ',p);
end.
Alte întrebări interesante
Matematică,
8 ani în urmă
Biologie,
8 ani în urmă
Matematică,
8 ani în urmă
Matematică,
9 ani în urmă
Engleza,
9 ani în urmă
Matematică,
9 ani în urmă