Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
Unyrfnch
24.02.2023 20:54 •
Информатика
Дано целое число a, значение которого вводится с клавиатуры. написать программу, которая выводит на экран true , если a не кратно трем и оканчивается нулем false в противном случае.
Показать ответ
Ответ:
Svetlanaaaa16
02.10.2020 22:37
Var a:integer;
begin
readln(a);
if ((a mod 3 <>0) and (a mod 10 = 0) and (a div 10>0)) or (a=0) then
writeln ('true')
else writeln ('false');
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Biszkopt99
18.09.2020 22:59
Составьте линейный алгоритм регистрации в соцсети (Инстаграмм, Вк, Facebook и т. д.) по примеру на картинке ...
KeKoLolist
24.09.2020 04:10
ПРАШУУУ ЬАДКЗЦХЦХЦЭЖЦЮЫ...
zhekabigboss
27.01.2020 11:54
Дан А(5) найди среднее значение отрицательных значений элементов массива...
алёчек
09.02.2022 16:25
Перечислите виды поворотов.Произнесите ключевые слова на трёх языках...
viktoria050504
06.06.2021 06:32
В зависимости от функций роботы бывают * ПодвижныеМобильныеБытовыеИсполнительУправляемыеПромышленные...
alexey2030
10.06.2022 12:25
Выведите 3 числа в порядке возрастания по программированию на языке с++...
milka1951
03.09.2021 23:17
Дано выражение с переменными x ,y, z. Составь программу, которая вычисляет значение этого выражения НА ЯЗЫКЕ ПИТОН 20 Б...
Sonta0004
17.06.2022 18:09
Укажите допустимые имена переменных в Python: Петр Первый ИвановИванИванович 1C-game C_game...
egor911777
20.01.2020 18:47
Робо-сумо. Урок 2 №2 №4 №3 №6...
liza1460
30.05.2020 18:36
используя генератор заполнения списка Создайте список чисел от одного до 30 вывести на экран количество четных и нечетных чисел в массиве A...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
readln(a);
if ((a mod 3 <>0) and (a mod 10 = 0) and (a div 10>0)) or (a=0) then
writeln ('true')
else writeln ('false');
end.