Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
lenabogdanv1
15.02.2023 09:48 •
Информатика
Написать программу, для вычисления количества всех трехзначных чисел, которые делятся на 3. написать в программе кумир.
Ответ:
ruqiyaaminova1
08.10.2020 08:08
Алг Числа
нач
цел k,i
k:=0
нц для i от 100 до 999
если mod(i,3)=0 то
k:=k+1
все
кц
вывод "k = ", k
кон
0,0
(0 оценок)
Ответ:
7Tamada7
08.10.2020 08:08
алг Трехзначные
нач цел a,i
a:=0;
нц для i от 100 до 999
i:=mod(i,3);
если i=0
то a:=a+1;
все
кц
вывод "Количество 3-хзначных чисел кратных 3-ем - ", a
кон
0,0
(0 оценок)
Популярные вопросы: Информатика
жанель67
30.10.2020 13:45
Скорость скачивания в торенте 7 мбит/сек. за какое время скачается файл 1,4 гбайта?...
hdhdydjsh
30.10.2020 13:45
Умоляю 4. в коробке лежат мелки белого и светло-жёлтого цвета. среди мелков 30 белых. сообщение о том, что из коробки достали светло-жёлтый мелок, несёт 4 бита информации. сколько...
kalaev19761
24.10.2021 02:50
Укажите наибольшее натуральное число, которое можно закодировать 8-ью битами(если все числа кодируются последовательно, начиная с единицы)....
viktoriav84
24.10.2021 02:50
Какая решается по следующей программе ? program test var a , b, c : integer; begin readln (a, b); c : =(a+b)*(b-a); writeln (c) end....
aisasiada
24.10.2021 02:50
Какие действия должен выполнять робот -шмель. какими свойствами должен обладать....
subbotina17
17.10.2020 10:54
Var k, m, day: integer; dat: array[1..10] of integer; begin dat[1]: =7; dat[2]: = 1; dat[3]: = 3; dat[4]: = 3; dat[5]: = 2; dat[6]: = 2; dat[7]: = 5; dat[8]: = 5; dat[9]: = 7; dat[10]:...
iliasbro87073799809
19.10.2020 01:46
Согласно стратегии РАФТ мать учителя возьмет на себя роль акима и напишет речь, посвященную Дню семьи....
POPKA1kemping
15.06.2022 16:23
Ознакомьтесь с ключевыми словами. Как вы думаете, о чём пойдёт речь на уроке?История, археология, время, Геродот, наука...
Jamik1008
03.06.2022 06:19
Слова-сверкать,засверкаешь,гуляют,прочитала, поохотиться с каждым словом записать его характеристики (часть речи,род или лицо, спряжение,время,число.)...
likaoolika
07.03.2023 15:46
нужно решение даю 50 1. Решите уравнения: а) 7 – 2х = 9 – 3х; б) 11х = 6 + 5(2х - 1); в) 6(2х - 3) – 3х = 2х – 4; г) 4(3х + 5) – 5(4х - 3) = 3....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
нач
цел k,i
k:=0
нц для i от 100 до 999
если mod(i,3)=0 то
k:=k+1
все
кц
вывод "k = ", k
кон
нач цел a,i
a:=0;
нц для i от 100 до 999
i:=mod(i,3);
если i=0
то a:=a+1;
все
кц
вывод "Количество 3-хзначных чисел кратных 3-ем - ", a
кон