Ответы на вопрос:
var
i,n: integer;
s: real;
begin
repeat
write ('n = '); readln(n);
until (n> 0);
s: =0;
for i: =1 to n do s: =s+1/i;
writeln ('s = ',s: 0: 4);
readln;
end.
антон, борис, давид, григорий ольга ,мария, светлана, екатерина
норильск + - - - - - - +
москва - - - + - + - -
ростов - - + - - - + -
пятигорск - + - - + - - -
=================================================================
антон екатерина норильск
борис ольга пятигорск
давид светлана ростов
григорий мария москва
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
Зайчик346809.08.2021 22:51
-
Alinka24Alinka23.01.2022 21:10
-
lilyarutyunova17.09.2021 22:32
-
nataliyagunina124.05.2023 06:37
-
Koul63708.05.2020 02:02
-
лизокумнок20.09.2020 22:39
-
guna331.05.2020 17:25
-
геля56987807.04.2020 03:49
-
stas27329.12.2021 14:18
-
He1111p03.03.2022 01:46
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.