Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
ErmolinVI
30.01.2023 00:11 •
Информатика
Составьте программу сложения ннатцральных чисел от 1 до 100. жду
Показать ответ
Ответ:
violetta238
17.07.2020 20:21
Var
a,i:integer;
Begin
for i:=1 to 100 do
a:=a+i;
writeln(a);
End.
Если не забудьте сказать
0,0
(0 оценок)
Популярные вопросы: Информатика
AnnaFruzanna
15.11.2020 13:58
расположи в правильном порялке дейсивия для выбора перехода к слайду. выбрать перезод Щелкнуть на стрелку в углу команды с видами переходов выбрать меню переходы?...
kirtema43
15.03.2021 00:31
1 Средствами текстового редактора MS Word создайте текстовый документ. Введите предложенный в задании текст....
Any0070
27.03.2021 02:57
Какая клавиша на клавиатуре отменяет демонстрацию слайдов презентации?Enter Esc F5 пробел?...
Murmurmur29
12.07.2021 05:37
По информатике самостоятельную дала фото смотрите 18...
Cjfd
27.01.2021 22:22
Записать на языке паскаля. даны два числа. замените меньшее из них модулем разности этих чисел, а большее модулем суммы....
aasybas
26.11.2022 07:36
Придумайте 5 предложений предложения с деепричастным оборотом,,заранее )...
polavskaya
05.10.2022 16:20
Может ли магнититься оксид хрома (lll)?...
Asya0199
26.11.2022 07:36
Смешали 200 г воды температурой 20 градусов и 520 воды при температуре 80 градусов пренебрегая потерями тепла определите температуру смеси...
Lerka0tarelka
16.08.2020 20:47
Точки а, в и с лежат на одной прямой, причем ab = 12 см, bc = 38 см. м - середина отрезка ав. найдите длину отрезка мс (все возможные случаи)....
Тэт11
02.11.2022 09:07
Моторов кайык озен агысымег еки бекеттин арасын 4сагатта жузип отеди егер еки бекеттин ара кашыктыгы 2км/саг болса кайык кери карай канша уакытта оралар еди...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
a,i:integer;
Begin
for i:=1 to 100 do
a:=a+i;
writeln(a);
End.
Если не забудьте сказать