Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
Pascal ABC Составьте программу ввода и вывода массива составте программу ввода и вывода масива 5 -2 3 6 7 9 -4 8 1 2 7-3 https://www.cyberforum.ru/ pascalabc/ thread552048.html Pascal ABC Получить слово, в котором указанная буква удалена
дано слово и число получить слово в котором в указанная буква удалена?
Pascal ABC Заполнение массива числами, не используя клавиатуру Пожалуйста, составьте программу заполнения массива, не используя клавиатуру, числами:1 3 5 7 9 11 13 15 17 19 https://www.cyberforum.ru/ pascalabc/ thread552038.html Pascal ABC Записи. Поиск людей с одинаковым адресом - помогите найти ошибку https://www.cyberforum.ru/ pascalabc/ thread551987.html
Здравствуйте. По заданию необходимо найти людей, проживающих по одному адресу. При этом должно быть указано, кто из одного, а кто из разных городов. Мною написанная программа, несмотря на то, что необходимые условия указаны (как я думаю), все же выводит несколько раз одного и того же человека. В чем может быть ошибка (подозреваю банально логическая)? Спасибо. program SearchPeople; uses...
Дан текст. Удалить слово с заданным номером Pascal ABC
1. Дан текст. Между соседними словами – не менее одного пробела, за последним словом - точка. Удалить слово с заданным номером. Результат вывести на экран.
Pascal ABC Двумерный массив. Определить количество выиграшей и количество проигрышей https://www.cyberforum.ru/ pascalabc/ thread551923.html
Дан двумерный массив из двух строк и двадцати двух столбцов. В его первой строке записано количество мячей, забитых футбольной командой в той или иной игре, во второй - количество пропущенных мячей в этой же игре. Определите количество выиграшей и количество проигрышей данной команды. Добавлено через 39 минут Помогите пожалуйста, завтра сдавать!
Pascal ABC Текстовые файлы. Подсчитать, сколько слов начинается с указанной буквы https://www.cyberforum.ru/ pascalabc/ thread551913.html
Даны файл, содержащий текст на русском языке, и некоторая буква. Подсчитать, сколько слов начинается с указанной буквы
Pascal ABC Реализовать рекурсивную функцию вычисления n-го числа из последовательности Фибоначчи
Реализовать рекурсивную функцию вычисления n-го числа из последовательности Фибоначчи по формуле: Fin(1)=1; Fib(n)=Fib(n-1)+Fib(n-2). Добавлено через 17 минут program rekursija; var n:integer; function fib(n:integer):integer; begin if n=0 then fib:=0 else
Pascal ABC Реализовать рекурсивную функцию, находящую приближенное значение корня k-й степени из числа x Реализовать рекурсивную функцию, находящую приближенное значение корня k-й степени из числа x по формуле: y(0) = 1, y(n+1)=y(n)-/k, (x - вещественный параметр, k и n - целые; x > 0, k > 1, n > 0). Добавлено через 14 минут Должно быть что-то типа этого, но рабочее. А то я составил но не могу доделать. Program Ex; uses crt; var k,n:longint;x,m:real;label t; https://www.cyberforum.ru/ pascalabc/ thread551902.html Pascal ABC записи На складе комплектующих деталей хранятся N деталей, каждая из которых характеризуется записью следующего вида: Type ZAP=record DTL:string; PR1:integer; PR2,PR3:boolean; end; Здесь dtl – наименование детали; pr1,pr2,pr3 – некоторые признаки детали. Необходимо подго-товить детали к запуску в сборочный цех. Для этого их следует разбить на пары (z1,z2), где z1, z2 пере-менные типа zap, таким... https://www.cyberforum.ru/ pascalabc/ thread551900.html
Pascal ABC Записи. Структура: дата выезда, пункт назначения, время отправления, число свободных мест
У администратора железнодорожных касс хранится информация о свободных местах в поездах по всем направлениям на ближайшую неделю. Данная информация представлена в следующем виде: дата выезда, конечный пункт назначения, время отправления, число свободных купейных мест, число свободных плацкартных мест. Оргкомитет международной конференции обращается к администратору с просьбой зарезервировать 50...
Pascal ABC Ветвление: Определить, пройдет ли кирпич через отверстие заданных размеров заданы размеры А, В прямоугольного отверстия и размеры x, y, z кирпича. определить пройдет ли кирпич через отверстие. https://www.cyberforum.ru/ pascalabc/ thread551868.html
0 / 0 / 0
Регистрация: 18.04.2012
Сообщений: 15
18.04.2012, 22:24  [ТС] 0

Среди четырехзначных чисел выбрать те, в которых все четыре цифры разные - Pascal ABC - Ответ 2928002

18.04.2012, 22:24. Показов 10177. Ответов 3
Метки (Все метки)

Ответ

спасибо, но тут в чем проблема, нужно , что бы числа вводились , и из них выбирали те, в которых 4 числа все разные..

Вернуться к обсуждению:
Среди четырехзначных чисел выбрать те, в которых все четыре цифры разные Pascal ABC
0
Заказать работу у эксперта
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
18.04.2012, 22:24
Готовые ответы и решения:

Среди четырехзначных чисел выбрать те, у которых все четыре цифры различны.
Среди четырехзначных чисел выбрать те, у которых все четыре цифры различны.

Среди четырёхзначных чисел выбрать те, у которых: цифры образуют возрастную последовательность
Среди четырёхзначных чисел выбрать те, у которых: цифры образуют возрастную...

Среди четырехзначных натуральных чисел выбрать те, у которых все цифры четные, а их сумма делится на 8
Среди четырехзначных натуральных чисел выбрать те, у которых все цифры четные, а их сумма делится...

Среди четырехзначных чисел выбрать те, у которых все четыре цифры различны
Среди четырехзначных чисел выбрать те, у которых все четыре цифры различны (Windows Form)

3
18.04.2012, 22:24
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
18.04.2012, 22:24
Помогаю со студенческими работами здесь

Среди четырехзначных чисел выбрать те, у которых все четыре цифры различны
Среди четырехзначных чисел выбрать те, у которых все четыре цифры различны. Delphi 7

Среди четырёхзначных чисел выбрать те, у которых все четыре цифры различные
Среди четырёхзначных чисел выбрать те, у которых все четыре цифры различные.

Среди четырехзначных натуральных чисел выбрать те, у которых все цифры четные, а их сумма делится на 8
на паскале как то так, эту же программу только на сишарпе var i,j,k,l:integer; begin for i:=1...

Среди четырехзначных чисел выбрать те, у которых цифры различны
Среди четырехзначных чисел выбрать те, у которых цифры различны. c использованием while

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru