По заданным блок-схемам написать программы на языке программирования Паскаль

lebedevan189 lebedevan189    1   19.04.2020 16:18    0

Ответы
ШаркоВалерия ШаркоВалерия  13.10.2020 11:53

Program Pr1;

var i,N:integer;sum:real;

begin

sum:=0;

Write (' N=');Readln(N);

for i:=1 to N do

sum:=sum +1/(20*i+2);

Writeln('sum=',sum);

end.

Объяснение:

Как я помню такая запись

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика