Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
Vladislav45609
29.09.2021 04:22 •
Информатика
Составить программу на паскале, которая находит сумму цифр от 1 до 25
Ответ:
serovv751
07.10.2020 19:39
//PascalABC.NET
//Версия 3.3, сборка 1611
begin
write(range(1,25).Sum());
end.
0,0
(0 оценок)
Ответ:
zurkus112
07.10.2020 19:39
Var
i, sum:integer;
begin
For i:= 1 to 25 do
sum := sum + i;
Writeln(sum);
end.
Результат:
325
0,0
(0 оценок)
Популярные вопросы: Информатика
Мария178930
19.09.2021 07:46
5) Ася составляет 7-буквенные слова из букв А, П, Е, Л, Ь, С, И, Н. Все буквы слова различны. Буква Ь, если встречается, стоит между двумя согласными. Сколько таких слов может составить...
lllllll47900732
10.06.2021 20:04
10. Определите значение переменной f.а) f=-15b) f=0c) f=56+2d) f=81/9e) f=25*25...
Дінислам
05.08.2021 01:42
На питоне. Дана последовательность натуральных чисел, завершающаяся число 0. Определите наибольшую длину монотонного фрагмента последовательности (то есть такого фрагмента, где все...
Мария20041007
06.10.2020 18:58
Програмада жаңа терезе ашу үшін қандай қадамдарды орындау керек...
ПолинаАпгрейт
27.07.2021 13:48
Скажите как активировать windows 7 профессиональная(×64)...
Призванный
09.06.2022 12:14
Написать программу, которая считывает три предложения и выводит их в обратном порядке. В СИ...
kirra00787p07znc
27.01.2022 01:29
Найти значение выражений, расписав каждое действие: а) F = ¬ A ∨ (B ∨ C ∧ A), где A, С = 1, В = 0 б) F = ¬ (А ∧ B) ∨ С, где A = 0, В, С = 1....
Лерчик1242
06.07.2022 05:33
Программалық кодтағы операторлар тізбегінің балама операторын анықта.X=5Y=5Z=5....
Avry99
19.03.2022 00:13
Условия задачи: Заполните двумерный массив отрицательными и положительными целыми случайными числами. Изменить массив путем деления всех его элементов на максимальный по модулю элемент....
EtoBolshayaProblema
09.11.2020 19:52
1) Каким образом можно использовать ранее созданную диаграмму для данных из других электронных таблиц? Выберите один ответ: A. При создании очередной диаграммы копировать какую-либо...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
//Версия 3.3, сборка 1611
begin
write(range(1,25).Sum());
end.
i, sum:integer;
begin
For i:= 1 to 25 do
sum := sum + i;
Writeln(sum);
end.
Результат:
325