Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
Молодочек
29.12.2021 22:59 •
Информатика
Написать программу нахождения суммы чисел от 1 до n. где n - число, вводимое клавиатурой
Показать ответ
Ответ:
Chalmers1998
15.07.2020 19:30
Var a:real;
n:integer;
begin
readln(n);
a:=(1+n)*n/2;
writeln(a);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
FeliceMell
13.02.2021 18:43
Как будет преобразовано число 60, если исполнитель выполнит алгоритм: aabab....
аличка77
02.06.2022 08:58
Хелп любые 2. Информатика...
Dimitriy2281
25.06.2020 12:48
Информатика ( П.О.М.О.Г.И.Т.Е)...
angelina436
25.04.2023 00:47
Напишите программный код, который копирует n символов из строки S1 в строку S2. Например: аутентификация отобразить на экране слово фикация...
ludcolobanova
28.10.2021 23:35
Найдите среднее арифметическое этих трех чисел. Заполните фрагмент программного кода a = int (input ()) b = int (input ()) c = int (input ()) print (D)...
jubatkanovajd
20.12.2020 08:15
язык Java Script ) 1.Создать три переменные, найти самое большое. (используйте prompt) 2.Создать массив и заполнить его числами от 3000 до 4000 3.Найти в массиве четные...
оуовлвдсл
14.07.2021 02:48
2. Постройте таблицу истинности логической функции . Сравните её с таблицей истинности функции A B....
vkunney
28.01.2020 06:49
5. Из чего состоит интерфейс текстового процессора Word ?...
1337zezar1
01.11.2022 23:50
Рабочий стол Документов Googe можно разделить на пять областей: 1 - позволяет переключаться между сервисами Googe. 2 - позволяет выполнять быстрый поиск документов по...
temaimcheg
08.03.2020 22:17
Каковы функции гипофиза и щитовидной железы?...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
n:integer;
begin
readln(n);
a:=(1+n)*n/2;
writeln(a);
end.