Составить программку вычисления значения выражения y=1+1/2+1/3+... +1/20.В данном случае

Составить программку вычисления значения выражения y=1+1/2+1/3+... +1/20.
В данном случае целесообразно организовать цикл с параметром, изменяющимся от 1 до 20, то есть шаг изменения параметра равен +1. Обозначим: у - еще одно значение суммы дробей; n - параметр цикла. Беря во внимание это, составим программку:
PASCAL ABC! ПОЖАЛУЙСТА, ОТМЕЧУ КАК Наилучший ОТВЕТ!!

Задать свой вопрос
1 ответ
Var
i: integer;
s: real;
begin
for i:=1 to 20 do
s:=s+1/i;
write ('Сумма приравнивается', s)
end.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

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

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт