Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
Anymarspop
23.01.2022 06:48 •
Информатика
Составьте программу для вычисления суммы s=1+2+3+4++n (на языке паскаль)
Показать ответ
Ответ:
даша21211
03.08.2020 23:57
Я не знаю какой именно вам нужен паскаль, поэтому пишу на delphi:
var
n:integer;
begin
readln(n);
writeln((n+1)*n div 2);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
svetlanko2000
28.12.2021 12:01
Государство на стыке центрально и южной европы . конфедерация...
khana3
07.04.2022 22:23
Нужно расставить по порядку begin,begin,end,end,writeln(i*j),for i:=1 to 9 do,for j:=1 to 9 do...
Дашуля110506
01.05.2022 20:40
Укажите любые 3 параметра настройки сноски и их виды ...
DaryaKovalkina
24.05.2022 06:10
Какой графический редактор является векторный?GimpCorelDrawPaintAdobe Photoshop...
olivcad
08.04.2021 19:37
Укажите 3 любых параметра настройки сносок и их виды ...
Marinet1806
24.07.2022 00:38
В корзине лежат 8 чёрных шаров и 24 белых сколько бит информации несёт сообщение о том, что достали чёрный шар? ...
milka230614
17.07.2021 11:08
Өткізгіштің ұштарындағы кернеу 6в, кедергісі 3 ом. өткізгіштің ток күші қандай? 1. есептің алгоритмін жаз. Блок схемасын жаз...
pilotprofix
23.08.2022 03:27
Какой цвет модели RGB будет получен при следующих параметрах 8-ми цвет-ной палитры? Красный - 1, Зелёный - 1, Синий - 0 123456789012345678901234...
EpsilonDelta
04.05.2023 22:29
1. Напишите программу в среде Кумир на алгоритмическом языке: Ввести три числа, найти их сумму, произведение и среднее арифметическое. Пример: Введите три числа: 4 5 7 На...
Aleksandrall
14.01.2023 14:08
Сотнесите понятия гипперссылка ссылка оглавление....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var
n:integer;
begin
readln(n);
writeln((n+1)*n div 2);
end.