Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
torivova2004
16.11.2020 15:27 •
Информатика
Задано натуральное четырехзначное число. получить из его цифр все возможные двузначные числа pascal, решите
Показать ответ
Ответ:
tural22
06.07.2020 07:50
Var a,b,k,l,m,n:integer;
begin
readln(a);
b:=a;
n:=a mod 10;
k:=a div 1000;
l:=(a mod 1000) div 100;
m:=(a mod 100) div 10;
writeln(k+l,' ',k+m,' ',k+l,' ',l+m,' ',l+n,' ',m+n);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
alexalevdorovic
07.02.2023 11:22
УМОЛЯЮ напишите информацию о различных системах счисления.(не с интернета!)...
armate
04.01.2023 20:05
1. вставь пропущенные слова. будем называть всё то, на что мы обращаем наше внимание: данные для справки: объект,предмет,явление,действие,событие,процесс,живое существо,растение....
Yoyoy31231234
04.10.2021 20:45
1. определите количество информации в кбайтах книги, содержащей 128 страниц, на каждой странице 64 строк, в каждой строке 64 знака. 2.определите количество времени в минутах,...
Veronichkadyi
23.02.2022 05:01
Много ! в выражении (f+o+x+e): (f⋅r⋅d⋅d)(f+o+x+e): (f⋅r⋅d⋅d) можно заменять буквы цифрами (одинаковые буквы - одинаковыми цифрами, а разные - разными). какое самое большое целое...
bulkin12
05.06.2020 03:03
Информационный объем одного сообщения составляет 320 байт, а другого – 512 бит. Во сколько раз информационный объем первого сообщения больше объема второго сообщения?...
joom3
21.10.2021 08:05
Выполните умножение и переведите результат в десятичную систему счисления....
pavlova62
22.12.2022 11:59
У наслідок тертя створюються заряди. чи правильне це твердження? чому ?...
6valeria6
22.12.2022 11:59
Точки A B C расположены на одной прямой, и A1B1C1- ортогональные проекции этих точек, соответственно, AB = 5 BC = 10 A1C1 = 12. Найдите длины отрезков A1B1 и B1C1...
neverr
04.08.2021 06:58
Составить схему последовательности образование тромбов при ранении сосудов...
Фахрияlove1
06.01.2023 05:19
с историей! Даю все свои (Вопросы на фото)...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
readln(a);
b:=a;
n:=a mod 10;
k:=a div 1000;
l:=(a mod 1000) div 100;
m:=(a mod 100) div 10;
writeln(k+l,' ',k+m,' ',k+l,' ',l+m,' ',l+n,' ',m+n);
end.