Составить программу: найти сумму 1/2+2/3+3/4+4/5++50/51 прогр паскаль

lera784738374 lera784738374    1   20.05.2019 12:00    0

Ответы
krasotkinaeliz krasotkinaeliz  13.06.2020 21:47

var i:integer;

      s:real;

 

begin

s:=0;

for i:=1 to 50 do

s:=s+i/(i+1)

 

write(s);

 

end.

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