Задать вопрос
23 октября, 04:18

Дана

геометрическая прогрессия: 2, 6, 18, 54, ... Найдите сумму первых n элементов

прогрессии, используя оператор repeat.

+4
Ответы (1)
  1. 23 октября, 06:40
    0
    var s, n:integer;

    begin

    s:=2;

    readln (n) ;

    repeat

    s:=s*3;

    n:=n-1;

    until n=1;

    writeln (s) ;

    end.
Знаете ответ на вопрос?
Не уверены в ответе?
Правильный ответ на вопрос 👍 «Дана геометрическая прогрессия: 2, 6, 18, 54, ... Найдите сумму первых n элементов прогрессии, используя оператор repeat. ...» по предмету 📗 Информатика. Развернутая система поиска нашего сайта обязательно приведёт вас к нужной информации. Как вариант - оцените ответы на похожие вопросы. Но если вдруг и это не помогло - задавайте свой вопрос знающим оппонентам, которые быстро дадут на него ответ!
Искать готовые ответы