Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
69Maxsim96
08.03.2020 15:39 •
Информатика
Программа выполняется в паскале! дано целое число n (> 0). с операций деления нацело и взятия остатка от деления определить, имеются ли в записи числа n нечетные цифры. если имеются, то вывести true, если нет — вывести false. .
Показать ответ
Ответ:
Irina12369
03.07.2020 17:50
Var n:integer;
Begin
Read(n);
while (n>0) do begin
if(n mod 2 = 1) then begin
writeln(true);
exit;
end;
n := n div 10;
end;
writeln(false);
End.
0,0
(0 оценок)
Популярные вопросы: Информатика
vagiz7000
23.06.2021 18:07
Повтори k разкоманда1 команда2 командазконецозначает, что последовательность команд команда1 команда2 командаз повторится k раз. чертёжнику был дан для...
degtyarenko1999
23.03.2020 11:22
Домашнее задание «Линейные и разветвляющиеся вычислительные процессы» Вариант 2 В тетради составить блок-схемы, задачи решить на компьютере, первая - линейный алгоритм,...
Vlad5682
27.07.2022 12:17
Рассмотрите базу данных успеваемости...
Batanik17
11.12.2021 10:02
Var y real i: integerbeginy=0; i:=5while i 2 dobegini=1-1y =y+i7endendответ: y=...
Q3max2011
25.03.2023 01:30
Информатика Qbasic задание на фотографии. Нужно составить алгоритм и программу....
maja6
11.03.2023 08:16
В хромосомах человека содержится 3079843747 пар нуклеотидов. Сколько Гб информации содержится в этих хромосомах?...
antoxor
23.06.2022 05:30
Максат нарисовал изображения цветов для реферата по биологии. Данные изображения хранятся в оперативной памяти. Изображение одного цветка требует 15 Кб памяти....
1Маша1231111
17.11.2020 06:02
нужна , нужно написать программу в питоне для вычисления большего числа из предложенных. Не понимаю что не так в программе. Заранее , рядом примерно задание. a=int(input(...
Вилка68762
05.07.2022 21:41
Максим составляет таблицу кодовых слов для передачи сообщений, каждому возможному сообщению соответствует своё кодовое слово. В качестве кодовых слов Максим использует...
Vikasuk
02.12.2022 01:32
Написать программу, которая находит среднее арифметическое всех двузначных чисел, сумма цифр которых равна 7. ( Писать на C )....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
Begin
Read(n);
while (n>0) do begin
if(n mod 2 = 1) then begin
writeln(true);
exit;
end;
n := n div 10;
end;
writeln(false);
End.