Scrieţi un program care citeşte de la tastatură un număr natural şi calculează suma numerelor pare cuprinse între 1 şi n.Ajutor!
Răspunsuri la întrebare
Răspuns de
2
Program P1;
var i, n, suma : integer;
begin
write('n = ');
readln(n);
suma := 0;
for i := 1 to n do
begin
if (i mod 2 = 0) then suma := suma + i;
end;
writeln('Suma tuturor numerelor pare de la 1 la ', n, ' este: ', suma);
end.
Alte întrebări interesante
Istorie,
8 ani în urmă
Istorie,
9 ani în urmă
Matematică,
9 ani în urmă
Matematică,
9 ani în urmă
Limba română,
9 ani în urmă