Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
stas289
28.04.2020 23:11 •
Информатика
Напишите программу на языке паскаль: найти все числа в диапазоне от 1 до 100, которые делятся на 5, но не делятся на 10.
Показать ответ
Ответ:
yanaoneshko562
03.10.2020 19:14
Var i: integer;
begin
for i:=1 to 100 do
begin
if ((i mod 5)=0) and ((i mod 10)<>0) then
write(i,' ');
end;
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
romankrohov2005
21.04.2021 20:37
ЭТО ПРОГРАММА В PYTHON !ОЧЕНЬ НАДО! ПРОСТО ОЧЕНЬ...
Angelina1355555
29.09.2020 19:05
ТНИ Напишите программу нахождения площадипрямоугольника на языке программированияC++. Длина прямоугольника равна 5 см ширина– 3 см.Для написания программы используйте онлайнкомпилятор....
Arina1518
24.06.2021 03:07
Корова по имени Бесик красит забор Фермеру Арсену. Бесик начинает в позиции 0 и выполняет последовательность из N операции. (1 = N = 100,000) вида 10 L , что означает покрасить...
Alferd
11.09.2020 16:59
Сколько ячеек памяти будет отведено для хранения массива a, заданного таким образом var a: array[-5..10] of integer; ?...
Вадим363737466
15.10.2020 07:51
Создать два файла, заполнить их текстом. написать программу, которая сохраняет содержимое этих двух файлов в один, новый файл....
baklazhan2004
16.07.2022 00:22
В одной из кодировок каждый символ кодируется 8 битами. Вова написал текст (в нём нет лишних пробелов): «Фиалка, лютик, роза, гвоздика, мак, хризантема, гладиолус – это...
kannoesubaru37
15.03.2021 06:00
Создайте программу, которая выполняет следующие действия: 1. Определите 8 целочисленных переменных. Назначьте этим переменным случайные числа из следующих диапазонов и...
sheramedi
28.04.2020 21:21
решить задание по информатике, к каждому заданию подходит свои данные из нижнего скриншота...
Легендабокса
20.06.2020 14:02
Напишите программу ,которая спросит имя пользователя и класс в котором он учится,а затем выдаст строку (имя пользователя) ,если введено число класса до 9, то написать ,ты...
imaya88
20.06.2020 14:02
Как это сделать? в первом столбце посредством операции заполнить введите числа от 1 до 30. во втором столбце используя функцию радианы() переведите значения из первого...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
for i:=1 to 100 do
begin
if ((i mod 5)=0) and ((i mod 10)<>0) then
write(i,' ');
end;
end.