Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
артур614
16.08.2020 01:59 •
Информатика
Написать программу, которая вычисляет сумму первых n членов ряда 1,3,5,7.. количество суммируемых членов ряда задаеться во время работы
Ответ:
fonvg
12.06.2020 01:54
var n,i,c:,a:longint;
begin
read(n);
a:=1;
for i:=1 to n do
begin
c:=a+c;
a:=a+2;
end;
write(c);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
yatsunvalya
17.10.2020 13:52
Перевести число из 10 системы в 2,8,16 а)250(10) в)757(10) с)914,625...
kos655005123
17.10.2020 13:52
Согласно ряда ученых (о. тофлер, белл, масуда и др.) в «информационном обществе»: a)большинство работающих будет занято производством, хранением и переработкой информации,...
АлинаЛог
07.01.2023 11:24
В чем разница между рисование и оброботкой рисункаИКТ...
chanel00
17.05.2022 00:19
Число вводится с клавиатуры, определить является ли оно трехзначным. паскаль...
Makaezhik02
06.09.2021 10:16
Python ᅠᅠᅠᅠᅠᅠᅠᅠᅠᅠᅠᅠᅠᅠᅠᅠᅠᅠᅠᅠᅠᅠᅠᅠᅠᅠᅠᅠᅠᅠᅠᅠ...
nzotov299
28.01.2020 11:34
Файлом называют набор А) данных ,которые хранятся в памяти компьютера и имеют имя Б) звуковых данных В) числовых данных Г) текстовых и числовых данных ...
hdhushehsuu
11.06.2020 05:14
1/х-3 - 6/х/\2-9 объяснение...
Linaa631
12.01.2022 14:35
Укажите варианты ответов, в которых дано верное объяснение написания выделенного слова. 1. ЗАГОРАТЬ – в корне с чередованием пишется О без ударения. 2. ХОЛМИСТЫЙ – написание...
natochkaa333
09.06.2020 03:01
Если считаете утверждение верным, поставь около его знак +,если неверным то знак -...
Zarinka952
25.08.2022 01:38
1) назовите 3 высокие горы, и в каких континентах они находятся....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
var n,i,c:,a:longint;
begin
read(n);
a:=1;
for i:=1 to n do
begin
c:=a+c;
a:=a+2;
end;
write(c);
end.