Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
ZKRMT
27.09.2021 21:46 •
Информатика
Ввести с клавиатуры целое число вывод на экран верноли это введеное число оканчивается на 3
Показать ответ
Ответ:
cawa1303
07.10.2020 09:12
// PascalABC.NET 3.3, сборка 1583 от 25.11.2017
// Внимание! Если программа не работает, обновите версию!
begin
Writeln(Abs(ReadInteger) mod 10=3)
end.
Примеры
2453
True
-106463
True
4353421
False
0,0
(0 оценок)
Ответ:
МОЗГ1987
07.10.2020 09:12
Var x,y:integer;
Begin
Write('Введите число: ');
Readln(x);
If x mod 10 = 3 then Writeln('Да')
else Writeln('Нет');
End.
После Writeln('Да') точка с запятой НЕ нужна!
0,0
(0 оценок)
Популярные вопросы: Информатика
polyakovred
14.10.2020 23:18
Нужно в с++! (2 через цикл с предусловием while) 1.дано натуральное число n. перевернуть число: заменить порядок следования цифр числа n наоборот. 2.дано натуральное число...
aleksapopov1
07.10.2020 06:08
Впрограмме описан одномерный целочисленный массив с индексами от 0 до 10. s: =0 n: =10 for i: =0 to n-2 do begin s: =s+a[i]-a[i+2] в начале выполнения этого фрагмента в...
sonyacherepanova
07.08.2021 20:01
Все 5-буквенные слова составленные из букв г, д,о, записаны в алфавитном порядке .Вот начало списка: 1. 2.Д 3.О 4.ГГГДГ ... Укажите номер,под которым в этом списке будет...
Ryuuko
31.05.2022 07:43
ИНФОРМАТИКА. Нужно описать процедуры или доказать Опишите процедуры нахождения символа К. Якоби и символа А.-М. Лежандра.или (на приложенном скриншоте)...
Grinberg2003
02.11.2021 05:50
Автомобиль преодолел расстояние s км через населенный пункт за t мин. Определить, не нарушил водитель правил дорожного движения, если скорость автомобиля при этом не должна...
koshulinskayag
23.05.2023 11:15
Скласти програму ввести номер квартири від 1 до 5 вивести кілька мешканців квартири...
шляпамайонезная
12.12.2020 14:05
Исправьте задачу . Программа должна сортировать упорядоченные значения в заданной матрице. Условия задачи :Найти максимальный среди всех элементов тех строк заданной матрицы,...
ФАНТА66666
22.09.2021 22:14
2. Вычислите значение выражения (9EF16+208)*24 и запишите ответ в двоичной системе счисления...
pamagiteplease
19.11.2021 15:14
Дан массив в[20]. Найти max и min элементов и поменять их местами....
KekLol89
03.01.2021 14:12
Что такое Сервомотор? а)устройство для определения цветаб)устройство для движения роботав)устройство для проигрывания звукаг)устройство для хранения данных ...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
// Внимание! Если программа не работает, обновите версию!
begin
Writeln(Abs(ReadInteger) mod 10=3)
end.
Примеры
2453
True
-106463
True
4353421
False
Begin
Write('Введите число: ');
Readln(x);
If x mod 10 = 3 then Writeln('Да')
else Writeln('Нет');
End.
После Writeln('Да') точка с запятой НЕ нужна!