Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
GaLat666
18.12.2022 18:58 •
Информатика
Напишите программу,которая вводит четырехзначное число и вырезает из него вторую цифру(на языке паскаль)
Показать ответ
Ответ:
BEDmil00
02.10.2020 09:43
Program chisla;
var a:integer;
begin
Write('Введите четырехзначное число: ');
read(a);
if (a<=9999) and (a>=1000) then
begin
Writeln('Вторая цифра ',a div 100 mod 10);
end
else
Writeln('Это не четырехзначное число');
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
mrden4uk1
08.06.2023 16:39
Маша пришла к однокласснице кате, живущей в первом подъезде девятиэтажного дома, на каждом этаже которого 3 квартиры. набирая номер квартиры на домофоне, маша не использовала кнопки...
NastyuZnanija
11.07.2022 03:42
Запишите высказывания в виде блок схемы Если стараться,то всё получится,иначе и за дело не берись....
Елена21st
19.04.2021 21:36
В школе работают кружки по музыке, рисованию и математике. На кружок по музыке ходит 27 шестиклассников, по рисованию – 39, по математике – 14. При этом каждый шестиклассник ходит...
Artishokq
13.07.2022 17:46
Составьте блок-схему и программу для нахождения среднего всех натуральных трехзначных чисел на отрезке [300,900] написать на питоне...
Levkoi
30.08.2021 22:01
Учебное задание: 1. Определите основную мысль текста.2. Найдите и выпишите предложения с однородными членами.3. Найдите предложение, в котором стоит тире между подлежащим и сказуемым....
Artem3460
26.07.2020 22:30
Тест по рассказу Васюткино озеро: 1) Как Васютка рыбакам? а) Рисовал карты б) Говорил, где можно найти рыбу в) Приносил орехи г) Плёл сети 2) Как заблудился Васютка? а) Слишком долго...
Anutka15Love
21.08.2020 18:12
Задание 2. Определите содержание понятия “ресурсообеспечен- ность , заполните таблицу “Ресурсообеспеченность стран мира”....
Атытцрьури
30.10.2021 07:37
Укажи предложения, в которых деепричастия пишутся раздельно. (Не)взявши топора, избы не срубишь. (не)дооценив противника, ты рискуешь всё проиграть. Мы работали с утра до ночи, (не)думая...
alexsupper308
30.10.2021 07:37
Какой район Бразилии из представленных является наиболее густонаселённым? Северо-восточный?Юго-западный?Западный?...
NICHEGOHOROSHEGO1
01.03.2022 06:17
5. В параллелограмме ABCD сторона CD на 3 см меньше стороны BC, BD = 7 см, уголА = 60°. Найдите площадь параллелограмма ABCD....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var a:integer;
begin
Write('Введите четырехзначное число: ');
read(a);
if (a<=9999) and (a>=1000) then
begin
Writeln('Вторая цифра ',a div 100 mod 10);
end
else
Writeln('Это не четырехзначное число');
end.