Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
dashaananasic18
09.06.2023 19:19 •
Информатика
Составить программу, используя цикл с постусловием: подсчитать сумму всех нечётных чисел от 230 до 430
Ответ:
Євпак
24.06.2020 15:01
Var i,s: integer;
begin
clrscr;
s:=0;
for i:=230 to 430 do
s:=s+i;
writeln(s);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
makshardin17
12.08.2021 07:18
Как нужно закрашивать под буквой «в»...
нигич1
14.09.2021 05:36
Впаскаль. дано слово. перемешать все буквы в слове случайным образом....
lizabelova00
14.09.2021 05:36
Найти сумму чисел от 1 до 5 на языке бейсик...
EatDrinkAndEat
14.09.2021 05:36
Объем сообщения – 15 кбайт. известно, что данное сообщение содержит 7680 символов. какова мощность алфавита?...
Фаньчуфкат
26.04.2020 13:30
Установите соответствие между расширением файлов и типом файла?...
Пропропрокакашку
06.05.2020 14:14
Даны 2 числа увеличить 10 раз меньше из них...
99880
06.05.2020 14:14
Напишіть програму до і по інформатикі. з пункту а за течією річки в плив пліт. через 4 годин з того самого пункту і в тому самому напрямі вийшов човен власна швидкість...
Reaper655
06.05.2020 14:14
Найти среднеарифметическое 1100101,110010,1011...
лошжо
22.10.2021 16:42
Для чего применяется пункт меню «показ слайдов»...
BilberryS
22.10.2021 16:42
Как настроить смену слайдов автоматически а не по щелчку мыши?...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
begin
clrscr;
s:=0;
for i:=230 to 430 do
s:=s+i;
writeln(s);
end.