Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
katyunya998
20.05.2023 20:04 •
Информатика
Составить программу для нахождения суммы чисел : 5,10,15,20,…50
Ответ:
Надюшка2000
16.07.2020 16:23
Var i, x: integer;
begin
x := 0;
for i := 1 to 50 do
if (i mod 5 = 0) then x := x + i;
writeln(x);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
tatianabeklemia
20.02.2021 05:27
Только таблицу информатика 9 класс...
WESTBEST
05.04.2023 09:59
В каком файле содержится информация о зараженных и вылеченных объектах?...
averdarya
10.03.2023 00:48
можете в паскале написать программу и сфоткать Паскаль можно на телефон скачать или на компе...
lerafrank26022
05.06.2023 16:01
только правильно я за это решающую оценку получу ...
ivanbudaev1993
11.07.2022 01:12
Склавиатуры вводятся 5 чисел. определить есть ли среди них положительные, двузначные, кратные 5 и сколько их. паскаль...
ichkinaeozrvu1
17.05.2021 10:14
По блок схеме составить программу , определяющую значение переменной б а: =5 b: =0...
cleverprincess
28.06.2022 21:24
Вячейках excel расположены 10 элементов одномерного массива.вычислить среднее арифметическое нечетных элементов.vba....
AliskaLao16
28.06.2022 21:24
Help! сколько по объему( в килобайтах) будет занимать цветное изображение (512 цветов) размером 960*680...
тупой177
28.04.2020 22:53
По информатике.паскаль люди добрые, решить ,завтра зачёт по информатике,нужно эту решить.вот условие: вывести на экран все трехзначные числа,сумма квадратов цифр которых...
iamash2450
28.01.2022 05:56
Две стороны треугольника равны 8см и 6см.Высота,проведёная к первой стороне,равна 3см.Найдите высоту,проведёную ко второй стороне треугольника....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
begin
x := 0;
for i := 1 to 50 do
if (i mod 5 = 0) then x := x + i;
writeln(x);
end.