Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
daria2512
09.12.2021 03:04 •
Информатика
Найти количество натуральных чисел в диапазоне от 50 до 99 кратные 3 и 7
Показать ответ
Ответ:
Helen4647
09.07.2020 07:18
Program z7;
var i,w:integer;
begin
w:=0;
for i:=50 to 99 do begin
if (i mod 3 = 0) and (i mod 7 = 0) then
w:=w+1;
end;
writeln(w);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
ayatyusubova1
23.12.2022 18:43
Решить с++ вася решил немного попутешествовать и выяснил, что между некоторыми нет прямых авиарейсов, поэтому придётся лететь с пересадками. ему стало интересно, между какими...
Yulia01052
23.03.2023 03:42
Уяку клітинку було введено формулу=b1+a2, якщо після копіювання в клітинку f5 вона набула вигляду =d2+c3...
marusi220
04.10.2021 08:29
Сделать ! 1)сколько килобайт памяти будет занимать изображение размером 128×480 пикселей,где каждый пиксель кодируется 5 байтами ? 2)скорость печати принтера 12 стр. в минуту...
romanres7ov
16.01.2021 01:02
Алынған хабарды қай кезде ақпарат деп есептеуге, қай кезде есептемеуге болады көмектесіңдер...
ilyawifiilyap00qfm
08.05.2020 18:12
№1 определите количество пассажиров, которые могут поместиться на борт самолёта грузоподъемностью 8т(вес каждого пассажира вводится с клавиатуры). №2 начальный вклад в сберкассу...
Farys
22.06.2021 20:40
Примеры исполнителей, встречающихся в народных сказках. определите их типы....
Тёмаэх
22.06.2021 20:40
Напишите алгоритм нахождения перемещения, если ускорение равно 2 м/с2. v0=0,t=5c....
Vanilingus
18.03.2021 12:34
ЗАДАНИЕ. Напишите не менее 3 фактах, которыми можно доказать, что в странах Европы и Востока формировались абсолютные монархии. Можно брать любые из изученных стран...
kirrilkyplenow
17.08.2021 23:08
Выполните задание в тетради: «Двухчастный дневник»Цитата. Комментарий...
angel2112001
12.02.2021 21:08
5. Мәтіндегі оқиғаларды ретімен орналастырыңыз. Оқиғалар Еліміздің ең қымбат тарихи жәдігері — «Алтын адам». | Казіргі Қазақстан мәдениеті жаңа заманға сай мәдениет пен өнерді...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var i,w:integer;
begin
w:=0;
for i:=50 to 99 do begin
if (i mod 3 = 0) and (i mod 7 = 0) then
w:=w+1;
end;
writeln(w);
end.