Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
5312макс1245
02.07.2022 01:23 •
Информатика
Написать программу вычисления суммы S=1+2+3+...+n. На паскале
Показать ответ
Ответ:
yanshin4961
11.10.2020 12:26
var
n,i,s:longint;
begin
read(n);
for i:=1 to n do
s:=s+i;
writeln(s);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
gameplay135
17.01.2022 18:47
Натуральное число m называется совершенным если оно равно сумме своих делителей включая 1 но исключая себя. напечатать все совершенные числа меньше заданного n. с++...
anastasiyaryum1
08.07.2021 09:29
Ввести массив x из 25 элементов. увеличить все отрицательные элементы массива на 5 и вывести новый массив....
Julydd
07.03.2023 03:24
Где этот символ используют в наши дни @?...
laurenR
02.04.2022 13:41
Пожайлуста (если что там задания помечены зелёными галочками)...
Пони0с0радушкой
18.05.2023 20:35
В тексті а слова розділені пробілами вивести останнє слово яке зустрічаєт знанняься в тексті а...
elizabetas326
25.08.2022 15:26
Что будет если сложить int и float?...
navaxa
26.04.2020 19:09
Задача 2 Установити рівень навчальних досягнень учня (початковий, середній, достатній, високий) відповідно до заданої оцінки (від 1 до 12). Початковий 1-3, середній 4-6, достатній...
дизиль
13.04.2021 09:08
6класс информатика рабочая тетрадь босова. номер 196! зарание...
ilona10022002
18.09.2022 21:09
Программа под это и в окошке должен быть вывод ответа, типа если щелкнули на зиму - ответ: готовь сани, работаю в лазарусе...
Сонечко1001
25.04.2020 19:03
Определите тип алгоритма для указанных команд? ...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var
n,i,s:longint;
begin
read(n);
for i:=1 to n do
s:=s+i;
writeln(s);
end.