Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
snakesap
14.08.2021 14:25 •
Информатика
Определите и выведите на экран количество четырехзначных чисел, которые делятся без остатка на 15 и 17 одновременно
Показать ответ
Ответ:
Ленчикбарми
02.10.2020 15:44
Program danya;
uses crt;
var i,k:integer;
begin
clrscr;
k:=0;
for i:=1000 to 9999 do begin
if (i mod 15=0) and (i mod 17 =0) then k:=k+1; end;
Writeln('Количество чисел= ', k);
readln;
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
УмничкаХороша
17.10.2021 02:54
Сор выполняя панорамную съемку, оператор использовал штатив, но получил размытое изображение. опишите две причины, по которой это могло произойти....
Бегемот505
09.05.2022 16:54
Задан массив X[1..N]. Определите наиболее точную оценку временной сложности алгоритма S:=X[1]+X[N]; for k:=1 to N do for m := 1 to 5 do X[k]:=X[k]+S;...
Dhffhjh
10.03.2021 08:41
Вычислить значение функции y=|x²-5x-3| на отрезке [-5;2] с заданным шагом h=0.4Сделать блок схему и програмиы с циклом пред и пост условием ....
vladkabanets
06.05.2020 11:45
2) Посчитать произведение нечётных натуральных от 9 до k чисел, где k вводится с клавиатуры3) Посчитать сумму цифр нечётных двузначных чисел(например, 21-нечетное...
NastyaKoryak
02.04.2023 04:41
Реши задачу. Черно-белое (без градаций серого) графическое изображение имеет размер 49×49 точек. Какой объём памяти займёт это изображение? ответ: ... бит....
annakolupaewa20
21.08.2020 00:07
Прочитайте текст ответьте на вопросы выполните задания упражнение 83 8 класс ...
nikop65
01.12.2021 03:16
Стисло висловіть своє ставлення до міркувань Г. Сковороди.Чому Г.Сковороду називають українським сократом...
Nastya1112172
20.01.2020 14:22
Скласти прозовий план до вірша Пісня про рушник А. Малишка даю 32 алмази...
viktoriya229
01.12.2021 03:16
Закончите предложения, и что это? .Затопляемая часть речной долины Река с притоками .Участки суши, окруженные со всех сторон водой .Граница таяния ледников Средняя...
nata2784
20.08.2020 15:02
1.З яких фаз складається стрибок у висоту? 2.Як стрибків у висоту тобі відомі? 3.Які фактори впливають на дальність польоту м яча? 4.Який показник кута вильоту м...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
uses crt;
var i,k:integer;
begin
clrscr;
k:=0;
for i:=1000 to 9999 do begin
if (i mod 15=0) and (i mod 17 =0) then k:=k+1; end;
Writeln('Количество чисел= ', k);
readln;
end.