40 построить программу в pascal с циклической структуройдано - вопрос №209323640 от Redob 28.07.2022 07:54

Question

Информатика: 40 построить программу в pascal с циклической структуройдано натуральное число n. вычислить: 2/1+3/2+4/3+ +(n+1)/n​

Redob · Answer

program raf105; var  i,n: integer;  sum: real; begin  write( n = );  readln(n);  for i:=1 to n do    sum:= sum + (i+1)/i;  writeln( Вывод: ,sum); end.PascalABC 3.4.2...

40 построить программу в pascal с циклической структуройдано натуральное число n. вычислить: 2/1+3/2+4/3+ +(n+1)/n​

40 построить программу в pascal с циклической структуройдано натуральное число n. вычислить: 2/1+3/2+4/3+ +(n+1)/n