👤
IDANASTASIA714
a fost răspuns

in pascal
va rog enorm
...​

In Pascalva Rog Enorm class=

Răspuns :

Răspuns:

program suma;

var

  s:real;

  n:integer;

begin

    s:=0;

    n:=1;

    while(s<=0.999) do

    begin

         s:=s+n/(n+1);

         n:=n+1;

    end;

    writeln('Suma este ',s:6:3,' pentru n = ',n);

    readln;

end.

Explicație:

Vă mulțumim pentru vizita pe platforma noastră dedicată Informatică. Sperăm că informațiile oferite v-au fost utile. Dacă aveți întrebări sau aveți nevoie de sprijin suplimentar, vă încurajăm să ne contactați. Revenirea dumneavoastră ne bucură, iar dacă v-a plăcut, nu uitați să adăugați site-ul nostru la favorite!


ID Teachingsy: Alte intrebari