Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
colaboyy7704ox6ktx
07.10.2021 21:59 •
Информатика
Составить программу, которая посчитает кол-во чётных чисел на промежутке от 1 до 145
Показать ответ
Ответ:
aliona123456789
08.07.2020 08:54
Var i,kol:integer;
begin
kol:=0;
for i:=1 to 145 do
if not odd(i) then inc(kol);
writeln(kol);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Аранида
04.12.2021 08:35
Які повідомлення містять суб’єктивну інформацію?...
PISOS228XYI
27.06.2021 19:08
2000х2000 пикселей ! скажите ответ?...
OlegBasov
05.05.2023 19:00
Информатика 9 класс 1. Как называется единица измерения информации, равная 2^3 битам? 2. Если сообщение несёт 1 бит информации, то его неопределённость… а)не увеличивается...
Монтер111
21.08.2020 19:53
Имеются два дискретных (знаковых) троичных источника с независимыми элементами. На выходе каждого из источников появляются сообщения одинаковой длины по 10 элементов. Количество...
dimat123
28.03.2022 14:26
Как называется ключевое слово, выделенное на веб-странице цветом или подчёркиванием, от которого идёт гиперсвязь?...
Crackstack18
11.03.2020 10:48
1) Запишите на обычном языке сложные высказывания, выражен- ные формулами. Пусть А= «Тимуру нравится история», В= «Зое нравится информатика», С= «Puma может сделать видеоролик...
Ryslan090
29.12.2020 12:49
1. Сколько гигабайт информации содержится в сообщении объёмом четверть терабайта? 2. Укажите правильный порядок убывания перечисленных единиц измерения информации: - зеттабайт,...
lizo4ka004
24.05.2020 07:41
Информатика решить с деление в столбик в...
pandaaaaaa1506
16.02.2023 22:41
После загрузки ОС Windows указать, какие кнопки расположены на Панели задач....
eto1pizdech
02.12.2021 18:21
Задание 8 с.9 3 класс...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
kol:=0;
for i:=1 to 145 do
if not odd(i) then inc(kol);
writeln(kol);
end.