Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
1qq
29.10.2020 01:33 •
Информатика
Найти сумму последовательности чисел от 1 до n , где n вводится с клавиатуры
Показать ответ
Ответ:
kennY1771
10.07.2020 15:06
Program sum;
var
sum ,n , i : integer;
begin
readln (n);
for i:= 1 to n do
sum:= sum + i;
writeln (sum);
end;
0,0
(0 оценок)
Популярные вопросы: Информатика
bolgarevaua
02.12.2021 23:16
1)сколько значений возвращает подпрограмма-функция в основную программу? 2)что такое локальная переменная?...
Babocka1415
15.05.2023 03:16
Решить по икт, нужно написать команды( на фото) ...
LoL228LoL228LoL228
08.05.2021 21:42
Решить это просто сильно надо: ...
steamenigasteam
18.06.2022 03:20
3. дано целое трехзначное число а .составить программу, которая выводит сумму цифр данного числа. например, вводится число 423, а выводится число 9....
aleXxxx03
11.12.2020 15:08
Найти среднее арифмитическое 8 элементов массива...
braychenko1
05.03.2023 20:45
Дано натуральное число n. найти первую цифру числа nна языке си...
yakun3008
25.06.2021 13:52
Если убийство имело место после полуночи, то либо смит не был убийцей, либо джонс лжёт.если смит был убийцей, то убийство имело место после полуночи. следовательно джонс лжёт написать...
Anton222666222
31.01.2022 13:56
Написать программу суммирующую n элементов начиная с номера x по номер y из 10 элементов массива введенных случайным образом (pascal)...
ketgalyschko
25.02.2023 04:35
Укажите правила использования алгоритмов...
smellofcherry
08.11.2022 22:52
Написать программу сумирующую n первых элементов из 10 элементов массива введенных случайным образом (pascal)...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var
sum ,n , i : integer;
begin
readln (n);
for i:= 1 to n do
sum:= sum + i;
writeln (sum);
end;