Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
Supermopsmeni
03.10.2021 13:20 •
Информатика
Составьте программу для расчёта значения количества нечётных трёхзначных чисел
Показать ответ
Ответ:
kucm14
22.07.2020 18:21
Var i,count:integer;
begin
count:=0;
for i:=100 to 999 do
if i mod 2<>0 then inc(count);
writeln(count);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Аноним1418
02.07.2021 00:40
Внекоторой стране автомобильный номер длиной в 7 символов составляется из заглавных букв (всего используется 26 букв) и десятичных цифр в любом порядке. каждый символ кодируется...
shishkova600
02.07.2021 00:40
Постройте графическую модель вашей комнаты, указав на ней рас-положение всех предметов мебели, окон и дверей. запишите название построенной модели (карта, план, схема, чертёж,...
mishel7884
24.11.2020 05:26
СО 2 ЗАДАНИЕМ. Написать код на ПАСКАЛЕ....
vladimirrr74
25.03.2021 20:20
В каких случаях может возникнуть необходимость в использовании разделов многостраничного документа? 1) При использовании в документе шрифтов различной гарнитуры. 2) При необходимости...
Королева1986
31.10.2021 11:14
решите задачу Паскаля.На борту сомолета, летящего по маршруту Москва-Лондон, находится Х пассажиров. Три четверти пассажиров имеют билеты второго класса, все остальные-первого....
matyusha47
09.12.2022 08:29
Запишите наименьшее и наибольшее значение целой переменной x, при котором логическое выражение (x 1) and (not(x 5) or (x 3)) будет истинным....
Sashacat555
22.02.2023 14:26
Оптическое распознавание текста позволяет передавать рисунки по электронной почте применять к тексту электронный перевод, форматирование или преобразование в речь нет верного...
silonte
03.11.2020 07:09
11. Визначте, який фрагмент коду реалізовано, якщо елементи масиву А: array[1..10] of Integer набули таких значень:А) For i — 1 to 10 do A[i] — 2 — 1Б) For i = 1 to 10 do...
Маша923892
16.05.2023 16:24
12. Як описати массив Аз 10 слів? A) type mas = array[1..10] of String:var A: mas6) var 4: array[1..10] of RealB) var A: StringD) var A: array[1..10] of String...
Kirillastrovskiy
30.05.2021 12:49
Коли потрибно вживати розгалуження...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
count:=0;
for i:=100 to 999 do
if i mod 2<>0 then inc(count);
writeln(count);
end.