Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
ДарьяКаракал
03.10.2022 13:48 •
Информатика
Напишите программу для решения с клавиатуры вводится целое положительное 3-значное число ,если число четное то вычислить и вывести на экран все цифры числа каждую цифру в отдельной строке
Показать ответ
Ответ:
Niktommy
09.10.2020 06:43
PascalABC.NET 3.4.2, сборка 1847 от 28.10.2018Внимание! Если программа не работает, обновите версию!
begin
var n := ReadInteger;
if n.IsEven then n.ToString.ToCharArray.PrintLines
end.
518518
0,0
(0 оценок)
Популярные вопросы: Информатика
Адриана111111111
14.05.2021 16:20
Всостав средств программирования на языке высокого уровня обязательно входит жёсткий диск компилятор табличный редактор инструкция программиста...
Спартак2102
14.10.2021 01:56
Пригодность алгоритма для решения определённого класса дискретность результативность определённость массовость...
Darklife1
24.03.2022 02:18
Заполните массив случайными числами в интервале [100..999] и переставьте их по возрастанию суммы цифр....
evgeniya64
08.02.2020 11:31
Выбери антивирусну программусписка:Dr.WebMS ExcelCorelDrawWinRar...
vladdancer
10.04.2020 21:52
Какие задачи решаются с организационных методов защиты информации?...
Mehriban2007
18.07.2022 10:12
Задание 5 Заполните таблицу перечисленными ниже информационными процессами Естественные информационные процессы: Искусственные информационные процессы: а) сохранение...
ЛамповыйКун1
04.02.2021 13:58
Расскажите о документах, разрабатываемых на административном уровне информационной информации...
ксюша1638
25.11.2021 19:35
Для кодирования текста использовалась кодовая таблица символов, содержащая 16662 символов. каждый символ в ней закодирован минимально возможным и одинаковым количеством...
Анастейша1818
25.11.2021 19:35
С++ по номеру дня недели (целое число от 1 до 7) определить его название. и если сможете,напишите блок-...
evalissa17
04.09.2022 16:20
Информатика 10 класс, С пояснением...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
var n := ReadInteger;
if n.IsEven then n.ToString.ToCharArray.PrintLines
end.
518518