60

Написать программу на языке Паскаль: вычислить сумму 1/2+1/4+1/6+…

rem76 27 июля 2022

Написать программу на языке Паскаль: вычислить сумму 1/2+1/4+1/6+… 1/2n

категория: информатика

63

Program h2; constn=20; var i: integer; s: real; beginfor i: =2 to n dobeginif (i mod 2=0) then s: =s+1/i; end; writeln (s); end.

пользователи выбрали этот ответ лучшим
Знаете другой ответ?

Смотрите также:
Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...