Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
genatbukin
05.12.2022 10:23 •
Информатика
Составьте программу вычисления значения выражения для данного натурального числа n: 4+8+12+ … +4∙n.(паскаль)
Показать ответ
Ответ:
aliha001
20.07.2020 01:46
Вариант первый, обычным циклом.
program easy;
var n,i,k,a:integer;
begin
readln(n);
for i:=1 to n do begin
k+=4; //k=4i
a+=k;
end;
writeln(a);
end.
Вариант второй. Искомую сумму можно представить как
program normal;
var n:integer;
begin
readln(n);
writeln(2*n*(n+1));
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
kokoko29
27.01.2021 07:04
Написать программу в Pascale, которая генерирует три последовательности из десяти случайных чисел в диапазоне от 1 до 10, выводит каждую последовательность на экран и вычисляет...
olyasmirnova3
02.01.2023 11:33
Сколько существует трёхзначных чисел, все цифры которых различны?...
alelinahka
02.01.2023 11:33
Составить програму вывода на экран числа вводимого с клавиатуры. выводимому числу должно предшествова сообщение вы ввели число...
математик218
11.02.2023 01:04
Какая фраза является отрицанием утверждения «На улице идет снег и ветрено»? На улице идет снег или дует ветер. На улице нет снега и ветрено. На улице нет ни снега, ни ветра. На...
DashaCat02
21.11.2020 05:09
Задача 3. Определить, принадлежит ли точка (х, у) круговому кольцу с пептром в начале координат и внутренним радиусом г, а впешним R Заполните таблину значений для х - 3: y = 4;...
ByGaTiVlAdLeN
21.04.2020 18:24
D2. фанатам стратегий 3 (7 ) данный шаг отличается от предыдущего формулировкой ограничений на входные данные. перед проверкой решения с формулировкой ограничений из этого шага,...
police5
04.12.2020 21:56
У исполнителя Альфа две команды, которым присвоены номера: 1. прибавь 2 2. умножь на b (b - неизвестное натуральное число; b ≥ 2) Выполняя первую из них, Альфа увеличивает число...
Irynadv
04.12.2020 21:56
Задание №2. Если a=3, b=6, c=23 какой будет результат программы? a = input () b = input () c = input () d = a+b+c print(d) ответ: Задание №3. Если a=3, b=6, c=23 какой будет результат...
КастрюлькаПик
06.05.2022 15:32
Шарик массой 500г скатываясь с наклонной плоскости длиной 80см имея начальную скорость 2м/с. определить какую скорость имел шарик в конце наклонной плоскости если на него действовала...
пимимпп
06.05.2022 15:32
M^2 - n^2 -m + n представьте в виде произведения...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
program easy;
var n,i,k,a:integer;
begin
readln(n);
for i:=1 to n do begin
k+=4; //k=4i
a+=k;
end;
writeln(a);
end.
Вариант второй. Искомую сумму можно представить как
program normal;
var n:integer;
begin
readln(n);
writeln(2*n*(n+1));
end.