Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
vikap888
03.07.2020 18:14 •
Информатика
Вводится одно целое число не превосходящие 104 подсчитать сумму чисел до 1 и до 104
Ответ:
layro2
23.06.2020 03:27
Var
a,i,n:integer
begin
Readln(a);
for i:=a to 1 do
n:=n+I;
writeln(n);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
андряков1103
27.03.2021 00:50
2. запишите внутреннее представление десятичных чисел, используя 8-разрядную ячейку: а) 72; -72 б) – 101; 101...
Lera096811hk
15.06.2021 12:11
Перевести из десятиричной системы в двоичную,восьмеричную,шестнадцатиричную.число: 1355...
3ТОН
29.08.2021 14:53
В книге 100 страниц. На каждой странице 60 строк по 80 символов в строке. Вычислить информационный объем книги. Символ «весит» 8 бит...
anyanice7
11.10.2022 18:30
Файл 3840 кбайт передается через некоторое соединение за 30 секунд. определите время (в секундах) за которое можно передать через это же соединение файл размером 5760 кбайт....
Янчик172
12.01.2020 18:31
Д/з написать отзыв по произведению Достоевского Мальчик у Христа на елке ....
маша3019
23.11.2020 02:07
Қосаяқ сөзіне сөйлем құру...
поор2
26.06.2020 02:42
Водород, получение, свойства и применение. Практическая работа № 2 Получение водорода и изучение его свойств Данный эксперимент проводился с газообразным водородом, полученным...
tuni2
12.12.2020 01:21
С чем связано появление различий между передним и задним концом тела у червей?а) С трехслойным строениемб) С подвижным образом жизнив)С появлением полости телаг)С отсутствием...
ismatov031
12.12.2020 01:21
22. Найдите число возможных значений а, если a, b натуральные числа и аb+ 3b = 2023. Найдите число возможных значений а, если a, bнатуральные числа и аb+4b= 18....
25.04.2022 00:08
Мәтіндердің негізгі ойын беретін шағын шолу ақпараттың дұрысын тап. 1-мəтін. Свен Алкалай, БҰҰ Бас хатшысының орынбасары, БҰҰ Еуропалық экономикалықкомиссиясының атқарушы...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
a,i,n:integer
begin
Readln(a);
for i:=a to 1 do
n:=n+I;
writeln(n);
end.