Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
YaShKa111111
04.11.2021 05:59 •
Информатика
Как в паскале записать сумму чисел от 1 до n
Показать ответ
Ответ:
dvaleeva45
23.09.2020 19:52
Возможны ошибки.
Program prim;
Var x, s: integer;
Begin
s:=0
For x:= 1 to n do s:=s+x
Writeln ('Сумма равна' , s)
End.
0,0
(0 оценок)
Популярные вопросы: Информатика
Ангелина0611
09.02.2021 13:11
сделать хоть какое нибудь задание которое знаете...
toktamuratovanilufar
19.09.2022 07:24
В массиве 30 элементов заданных датчиком случайных чисел в диапазоне от -30 до 80. найти сумму всех элементов значения которых превышает 40 и посчитать количество чётных элементов....
anuaraminov10ozppq2
15.10.2022 21:06
Шифр Цезаря один из наиболее древнейших известных шифров. Схема шифрования очень проста — используется сдвиг буквы алфавита на фиксированное число позиций. Алфавит зацикливается,...
Isei
05.12.2021 02:04
Много ! как сделать лесенку из алфавита в pascal abc a ab abc по принципу var i: byte; j: char; begin...
Аружан200345
05.12.2021 02:04
Составить план конспект на любую тему...
mrzaizat
17.10.2021 23:51
Координируется 8 битами, найти информационный объём сообщения,состоящий из 120 символов...
Dmitry70
24.02.2021 22:28
Работа на компьютере в паскале, Написать программу: Вычислить y=4x^2+3x; x меняется от -3 до 6 с шагом 0.5...
Саляриум
14.04.2023 01:10
Типы данных. Урок 2TrueFalse...
hzhwhsbsh
18.05.2021 13:23
Почему порязрядочный перевода чисел удобнее?...
kirill67r
04.01.2020 08:13
Найдите значение сумма на координатной прямой -2и4...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
Program prim;
Var x, s: integer;
Begin
s:=0
For x:= 1 to n do s:=s+x
Writeln ('Сумма равна' , s)
End.