Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
01041
31.05.2021 08:22 •
Информатика
Напишите программу, которая вводит трехзначное число и разбивает его на цифры. пример: при вводе числа 123 программа должна вывести "1, 2, 3"
Показать ответ
Ответ:
martin37
01.10.2020 17:06
Var numb,sot,des,ed:integer;
begin
readln(numb);
sot:=numb div 100;
des:= numb mod 100;
des:= des div 10;
ed:= numb mod 10;
writeln(sot,' ',des,' ',ed);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Ьвот
28.10.2022 22:27
Даны действительные числа a, b, c. даны действительные числа a, b, c. найдите все решения квадратного уравнения ax2 + bx + c = 0. формат входных данных даны три действительных...
sen4enkostas
07.10.2021 18:36
и объясните как делать ...
Rita210606
03.07.2021 00:35
Опишите подробно свойство Animation...
AlexEremin2007
16.08.2021 19:05
«Внешность» категориясына кіретін командалардыанықтаңыз. ...
Georgiy11111
08.01.2020 14:32
Брошюра содержит 16 страниц, на каждой из которых в среднем по 32 строки, содержащих 64 символов каждая. Сколько килобайт составляет информационный обьём текстового файла с...
Merser2212
08.12.2021 18:28
Проанализируйте связи между первыми двумя объектами и подберите подходящий объект для третьего: 4.1 Цветок – плод = ребенок-… Учиться в) Игрушки Взрослый г) Кукла 4.2 Paint...
bellalove200
03.05.2021 11:15
Упрощение логических выражений решить через упрощение этих выражений ...
Anastasia2416
24.05.2021 13:56
Складіть проект для обчислення значення виразу (2a+b)*(a+c). (Это надо сделать в Lazarus, pascal)...
deniskim01
19.11.2021 15:06
Чему равно значение переменной s? s:=14 div 3...
comeback92
19.05.2021 04:54
Практическая работа в MS Excel 1. Записать выражения как формулы в Excel: а) 72 – (15 · (–5) + 23) : 7; б) –55 + 123 + (–4)5 : 22; в) 34 (7,2) 44 2,2 23,5 ( 6,2) 45 ( 3) 12,33...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
readln(numb);
sot:=numb div 100;
des:= numb mod 100;
des:= des div 10;
ed:= numb mod 10;
writeln(sot,' ',des,' ',ed);
end.