Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
YaroslavShevchuk
31.12.2021 11:55 •
Информатика
Определить и вывести на экран по отдельности цифры целого числа n
Показать ответ
Ответ:
Nastya152018
05.07.2020 19:41
var
i,num:integer;
num_s:string;
begin
write('vvedite celoe chislo: ');
read(num);
num_s:=IntToStr(num);
for i:=1 to num_s.length do
write(' ',num_s[i]);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
aldiyar20020922
23.03.2021 02:11
Из чего состоят основы философии?...
lisa1236
01.06.2021 01:28
напишите наименьшее число х, для которого ложно высказывание: не(x =50)или(х нечетное)...
ааа512
05.01.2021 18:56
chislo := chislo mod 7если chislo=3 то y:= если chislo=4 то y:= если chislo=5 то y:= если chislo=6 то y:= если chislo=0 то y:= если chislo=1 то y:= если chislo=2 то y:=...
АсияТулемисовна
30.06.2021 21:31
Этапы которых стоит придерживаться при разработке любых баз данных: 1/Разработка и создание форм для ввода данных в электронную таблицу.2/Выяснение задач, для которых...
smorodina83
12.04.2020 03:15
Напишите наибольшее число x, для которого ложно высказывание: Не(х =72) или не(х кратно18)...
ArtyomFoshan
18.02.2023 12:34
Дано целое число х. составьте программу, которая выясняет, верно ли , что 0 =x 1. на печать вывести да или нет....
riathome26
09.06.2022 03:01
После выключения компьтера проподает информация, которая 1.на жёстком диске, 2.на гибком диске, 3.в оперативной памяти, 4.на компакт-диске....
Englismen
09.06.2022 03:01
Даны два действительных числа . составьте программу , которая заменяет первое число нулем, если оно не меньше второго , или составляет без изменения в противном случае...
любимчик27
09.06.2022 03:01
Дано число х . составьте программу, которая находит значение корень х+1...
Otto111
09.06.2022 03:01
Дайте самый полный ответ. информтика - 1.умение обращаться с компьютером; 2.наука об информации и её хранения, обработки и передачи компьютера; 3.умения составлять компьютерные...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
i,num:integer;
num_s:string;
begin
write('vvedite celoe chislo: ');
read(num);
num_s:=IntToStr(num);
for i:=1 to num_s.length do
write(' ',num_s[i]);
end.