Ответы на вопрос:
Var i, n : integer; s : real; begin readln (n); for i: =2 to n do s: =s+i/(i+1); writeln(s: 0: 10); end.
Популярно: Информатика
-
Напишите программу, которая получает три числа – рост трёх спортсменов, и выводит...
морпехРФ16.12.2020 02:10 -
Свопросами по информатике! вопрос 1. наименьшее основание системы счисления...
Фари22804.10.2022 15:37 -
Написать программы в Паскале. 1. Известно что 2 автомобиля выехали одновременно...
Юра2285804.04.2020 20:56 -
класс 1.К основным операциям,возможным в графическом редакторе Paint,относятся...
wenizi28.11.2022 10:34 -
Построить программу, которая вводит координаты точки (x, y) и определяет, попадает...
Dodoso26.02.2020 03:24 -
Заданы три числа x,y, z. если z 0, то p задать как максимальное из x и y. если...
ritagribaleva19.10.2020 02:59 -
Впрямоугольной комнате расставить пять стульев так чтобы вдоль каждой стены...
romaberduk0311.10.2022 15:59 -
Сообщение, записано буквами из 16—символьного алфавита, содержит 130 символов....
Виктория22222211108.09.2022 03:50 -
Составить слово из мешка слова логика...
Gamer220539528.08.2021 19:57 -
Обобщение понятий- нескольких понятий в одном понятии....
ninahatsanowsk30.05.2023 14:33