Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
0508761681
21.02.2021 10:34 •
Информатика
Написать программу,которая находит все четырехзначные числа abcd,для которых выполняются условия 1)a,b,c,d-разные цифры 2)a*b-c*d=a+b+c+d
Показать ответ
Ответ:
GeorgYanovski777
03.07.2020 22:34
Program fofgogjoj;
var
a,b,c,d:integer;
begin
for c:=0 to 7 do
begin
a:=c+2;
d:=9-c;
for b:=0 to 9 do
begin
if (b<>c)and(b<>a)and(b<>d) then
Writeln(a,b,c,d);
Writeln;
end;
end;
readln;
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
72737
04.04.2021 02:08
Какие типы системных плат бывают ? каковы объемы современных жёстких магнитных дисков ? каков объем оперативной памяти у современных компьютеров ? какие существуют виды дисковода...
09alan
04.04.2021 02:08
Для чего компьютера нужна оперативная память если в нём есть долговременная память? почему нельзя обойтись только долговременной памятью?...
FoxyDi
16.11.2022 04:41
Домашнее задание На картинках представлены объекты культурногонаследия «Семь чудес Казахстана». Какие мастераискусств или специалисты их создавали? Найди инфор-мацию об этом в Интернете...
лппериоаоаопоопо
10.07.2022 05:22
На паскале написать дано целое число k (1 =k =365). присвоить целочисленной величине n значение 1, или 0 в зависимости от того,на какой день недели(понедельник, или воскресенье) приходится...
черныйЗайка
06.07.2021 01:11
Read these sentences and underline the compound nouns in them. How were they formed? — Прочитайте эти предложения и подчеркните сложные существительные в них. Как они образовались?...
girlmarta
06.07.2021 01:11
Read the article and learn more about da Vinci. Then answer the question: What is he famous for? — Прочитайте статью и узнайте больше о да Винчи. Затем ответьте на вопрос: Чем он...
Юлия3640
06.07.2021 01:11
Read the text and fill in the gaps with prepositions. – Прочитайте текст и заполните пропуски предлогами. Mikhail Lomonosov was born on November...
rusikov972
06.07.2021 01:11
Write these dates in words. 1 — 1996 — nineteen ninety-six 2 – 1783 – seventeen eighty-three...
Kyki510
06.07.2021 01:11
Correct mistakes in these sentences using Present Simple and Present Continuous. — Исправьте ошибки в этих предложениях, используя простое настоящее и простое продолженное времена....
matv
06.07.2021 01:11
Give short answers to these questions. — Дайте краткие ответы на эти вопросы. 1 Was Fyodor Shalyapin British?...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var
a,b,c,d:integer;
begin
for c:=0 to 7 do
begin
a:=c+2;
d:=9-c;
for b:=0 to 9 do
begin
if (b<>c)and(b<>a)and(b<>d) then
Writeln(a,b,c,d);
Writeln;
end;
end;
readln;
end.