calculati suma primelor n termene 1-1/2+1/3-1/4+1/5-1/6+....
Indicatii:Utilizati in ciclul instructiunea if odd(...) the ... else...
42154215q:
astept
vorbesti ruseste? esti din Basarabia?
vorbesc
rusesti
dar sunt din
balti
poti si la asta sa raspunzi inca 7?? http://brainly.ro/tema/2580633 dupa ce asa ma ajuti cu asta
dar in toata Moldova se face Pascal la scoala? Ca am mai vazut alti basarabeni intreband tot legat de Pascal
da poti si pseudocod,C???
da parca in toata moldova
Răspunsuri la întrebare
Răspuns de
7
program Tema;
Var i,n:integer
s:real;
begin
read(n);
i:=1;
s:=0.0;
while(i<=n) do
begin
if(odd(i)) then
s:=s+1.0/i;
else
s:=s-1.0/i;
i:=i+1;
end;
writeln('Suma ceruta este: ',s);
end.
Var i,n:integer
s:real;
begin
read(n);
i:=1;
s:=0.0;
while(i<=n) do
begin
if(odd(i)) then
s:=s+1.0/i;
else
s:=s-1.0/i;
i:=i+1;
end;
writeln('Suma ceruta este: ',s);
end.
Alte întrebări interesante
Limba română,
8 ani în urmă
Fizică,
8 ani în urmă
Matematică,
8 ani în urmă
Matematică,
9 ani în urmă
Informatică,
9 ani în urmă
Matematică,
9 ani în urmă