Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
mcghcnnbn
18.01.2023 17:20 •
Информатика
Напишите программу, которая вводит с клавиатуры пятизначное число и удаляет из него первую и последнюю цифру, а затем выводит на экран полученное трехзначное число. например, из числа 12345 должно получиться число 234. строки не использовать.
Ответ:
2мария3
09.10.2020 21:55
Var a: longint;
begin
readln(a);
a:=a mod 10000;
a:=a div 10;
writeln(a);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
nekit1307
26.05.2023 00:10
Сколько бит памяти занимает чёрно-белое изображение (без градаций серого) шириной 900 точек и высотой 3000 точек?...
kikesee
03.01.2023 07:30
3. мұғалім оқушыларға 20 таңбадан тұратын мәтінді компьютерде теру тапсырмасын берді. оқушы мәтінді қуаты 16 таңбадан тұратын алфавитпен терді, ал болат қуаты 256 таңба болатын алфавитпен...
tanecka2
01.05.2021 17:24
Составьте программу построения графика зависимости y=x*sin(x) на отрезке [-20; 20]...
ЕваКротевич
20.08.2022 22:38
Для чего нужно обновлять систему? нужно)...
1Nikanikanika1
20.08.2022 22:38
Составить блок программу с циклом и условием : сортировка на четность....
SONichka23
16.10.2021 18:59
Решите, , генетический ряд: s so2 so3 h2so4 ca2so4...
nector
16.10.2021 18:59
Какой растительный и животный мир в степи прерии...
Askas9999
16.10.2021 18:59
Отметьте опасные участке маршрута путешествие сход лавины...
Sadovnik11
16.10.2021 18:59
Снадо написать про достопримечательность лондона...
SuperAlinina
16.10.2021 18:59
Перечислите все битвы московского княжества с монголо-татарами и их годы...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
begin
readln(a);
a:=a mod 10000;
a:=a div 10;
writeln(a);
end.