Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
persik21783086532
10.05.2023 05:10 •
Информатика
Если не сложно.разработать программу которая по введённому трёхзначному числу которая выдаёт отдельно три его цифры напечатанные друг под другом
Показать ответ
Ответ:
Neuch18
08.10.2020 06:32
Плз. лучший ответ
program g;
var
a:Integer;
begin
writeln('Введите трёхзначное число');
readln(a);
writeln('');
writeln(a);
writeln(a div 100);
a:=a mod 100;
writeln(' ', a div 10);
a:= a mod 10;
writeln(' ', a);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
pogoreiko
20.11.2022 20:41
Заполнить массив числами по правилу: a[i]=i*3+2*a[i-1]. первый элемент массива равен 10....
respons
29.12.2022 01:58
Написать по дороге s.информатика.9класс...
сашп17
30.03.2021 18:00
Көмектесіп жібересіздерме өтініш? ! ...
qmess10
24.06.2022 12:45
Вводится 6 чисел определить сколько из них положительных и отрицательных...
serega5152
24.02.2022 05:55
Для игры используется барабан со стрелкой. барабан разделен на n секторов (n 6), каждый из которых обозначен уникальным натуральным числом от 1 до n, и в результате...
LemonkaGame
09.06.2023 07:04
Найдите средние арифметическое чесел 52;38,3;43,24;49,6;58,86....
Dafran
09.06.2023 07:04
Напишите рекламу ресторана на английском предложений 5...
sashachadaev
09.06.2023 07:04
Пряма y=kx+b проходить через точки А(2;-1) і В(1;-3). Знайдіть число b....
kirill994
07.07.2021 14:23
Составить рассказ по картинке на казахском языке 6 класс...
Pedors
14.08.2020 20:13
Кюй Байжума токпе или шертпе...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
program g;
var
a:Integer;
begin
writeln('Введите трёхзначное число');
readln(a);
writeln('');
writeln(a);
writeln(a div 100);
a:=a mod 100;
writeln(' ', a div 10);
a:= a mod 10;
writeln(' ', a);
end.