Войти Регистрация Спроси ai-bota

Найдите сумму первых n слагаемых ряда: 1,2,4,8,16,32..

Нажмите на рекламу ниже и сразу увидите ответ

↓

Популярные вопросы:

yuliayatseniuk1

11.06.2022 01:25

1. пример обмена информацией между людьми. кто в вашем примере является источником информации, а кто - приёмником.(3 примера) 2. вспомните сказку а. с. пушкина о царе салтане....

hggggg666

11.06.2022 01:25

Каков будет фактический объем сообщения приеду в четверг , если при передаче каждый символ кодируется минимально возможным целым числом бит?...

арут4

11.06.2022 01:25

Составьте программу вычисления суммы чисел в диапазоне то 1 до 100...

filanovich1984

11.06.2022 01:25

Program p_1; var a: string[50]; b: string[50]; begin write( заполните строку а и b ); read(a,b); if length(a) length(b) then writeln( первая строка длиннее ) else writeln(...

swetik101

19.01.2023 19:39

Программа считает средний арифметический успеваемости ученика за четверть.(паскаль авс)пример: строка ввода, язык 4, 5,информатика 4, 4,и.т.д....

poma070205

02.09.2020 21:44

Составить блок-схему следующей задачи: Ввести два числа. Если они равны, выдать на печать их сумму. Ввести два числа. Выдать на печать сумму чисел, если суима меньше 25 и...

matveyking12345

11.11.2021 08:09

По введенному номеру цвета от 1 до 7 ввести его название в Радуге если введена другая цифра то выдать сообщение такого цвета радуги нет ...

ATAT1

27.10.2021 23:48

Коля печатает 600 символов за 50 секунд. Вася за это же время. Во сколько раз скорость набора Коли больше скорости набора Васи?...

ШколоЛОх

18.06.2021 16:57

3. В языке запросов поискового сервера для обозначения логической операции «ИЛИ» используется символ «|», а для обозначения логической операции «И» — символ «&». В таблице...

nekitpundya2256

17.01.2023 13:22

Письменно ответьте на вопросы: - Как образуются понятия - Что такое сравнение (приведите свои примеры) - Что такое абстрагирование (приведите свои примеры) - Что такое анализ...

Ответ:

epstalmakov

23.09.2020 22:58

Var k,n,i,sum:integer;
Begin
Readln(n);
k:=1;
for i:=1 to n do
begin
sum:=sum+a;
k:=k*2
end;
Writeln('Сумма первых ',n,' слагаемых ряда равна ',sum)
End.

0,0(0 оценок)

Ответ:

gulim160104

23.09.2020 22:58

Var n,s,i,a:integer;
begin
readln(n);
s:=1;
a:=1;
for i:=2 to n do begin
a:=a*2;
s:=s+a;
end;
writeln(s);
end.

0,0(0 оценок)

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку