Ответы на вопрос:
Var n, i, s: integer; begin readln(n); s : = 2 * n; i : = 1; while i < = n do begin s : = s + 2 * (n + i); i : = i + 1; end; writeln(s); end.
Популярно: Информатика
-
Построить таблицы истинности для логических выражений и минимизировать с...
алина389304.01.2022 21:25 -
3. Какими характеристиками обладает идентификатор? ( ) А. Постоянная величина...
даха14414.08.2021 06:26 -
Назовите параметр цикла Начальное значение параметра цикла Условие при котором...
vera2210200718.12.2022 08:57 -
Что неправильно? Дано 2 числа ,проверить простые ли они,и вывести их если...
alexeytutkevicp09cxb24.06.2023 11:37 -
Уважаемые, судари и сударыни с этой гребанной информатикой :) Определите...
Murat2006120.03.2021 16:58 -
ПЕРЕВЕСТИ ЯЗЫК ПАСКАЛЬ НА ПИТОН var a, b, c: integer; begin Writeln( Введите...
Maykaktys14.06.2021 20:03 -
Напишите код программы: А) «введите число или Привет!» Б) после ввода с...
topgaimer01.05.2021 02:58 -
Цикл с параметром. Урок 2 Дан фрагмент кода программы. z= 0 for x in range(5):...
sidorov2681221.08.2021 18:35 -
Зависимость задана функцией y(a,b), в которой одно из выражений y1 = (a+b)*(a-b),...
alef91105.10.2022 16:58 -
ИНФОРМАТИКА ОЧЕНЬ НУЖНО...
Maks18909924.11.2021 20:55