Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
Анель1342
11.11.2021 23:13 •
Информатика
Напишите программу на языке паскаль: найти все числа в диапазоне от 1 до 100, которые делятся на 5, но не делятся на 10.
Показать ответ
Ответ:
kseniasergeeva10
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 оценок)
Популярные вопросы: Информатика
АнастасияCat144
02.05.2020 14:31
Дать определение разветвляющегося алгоритма. Дать определение команды.Что такое параметр цикла. Какие бывают цикла2. Как будет выглядеть на языке Паскаль следующее...
sergejkochetko
21.10.2020 13:39
Дан текстовый файл, содержащий целые числа. найти количество чисел в файле и их сумму....
софи253
21.10.2020 13:39
Написать программу в ! указание: заполнить двумерный числовой массив и(8,8) случайными целыми числами в интервале [-60,60].написать единую программу для всех ,ответ...
oaooks
17.03.2022 09:57
Напишите программу ,которая 10 раз выводится на экран ваше имя и фамилию. !...
Вундеркингsd
24.11.2021 06:27
Как можно расшифровать слово [email protected]#@!...
matany57
27.04.2023 19:14
1)определить результат логического выражения при заданных параметрах ¬( ¬b & ¬c ) u ¬( ¬a & ¬c ) при а=1,в=1,с=1 2) (аu(а& в))& (а& (аuв)) при...
Alishkek
27.04.2023 19:14
Как отличить активное окно от неактивного...
настя51001
03.10.2020 10:32
Запишите (в oc windows) полные имена всех файлов размещённых на диске, файловая структура которого представлена ниже: е: .avi |.xis |.bmp |.jpeg |.jpe | | | |.txt...
Karta2346574
29.11.2022 20:45
Представить в виде блок-схемы алгоритм, в котором переменной Y присваивается значение большей из трёх величин A, B и C...
Appolinaria06
16.07.2020 11:36
Представить в виде блок-схемы алгоритм решения уравнения: ax+b=0...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и 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.