|
|
Другие темы раздела | |
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 - Ответ 292800218.04.2012, 22:24. Показов 10177. Ответов 3
Метки (Все метки)
Ответ
спасибо, но тут в чем проблема, нужно , что бы числа вводились , и из них выбирали те, в которых 4 числа все разные..
Вернуться к обсуждению: Среди четырехзначных чисел выбрать те, в которых все четыре цифры разные Pascal ABC
0
|
18.04.2012, 22:24 | |
Готовые ответы и решения:
3
Среди четырехзначных чисел выбрать те, у которых все четыре цифры различны. Среди четырёхзначных чисел выбрать те, у которых: цифры образуют возрастную последовательность Среди четырехзначных натуральных чисел выбрать те, у которых все цифры четные, а их сумма делится на 8 Среди четырехзначных чисел выбрать те, у которых все четыре цифры различны |
18.04.2012, 22:24 | |
18.04.2012, 22:24 | |
Помогаю со студенческими работами здесь
0
Среди четырехзначных чисел выбрать те, у которых все четыре цифры различны Среди четырёхзначных чисел выбрать те, у которых все четыре цифры различные Среди четырехзначных натуральных чисел выбрать те, у которых все цифры четные, а их сумма делится на 8 Среди четырехзначных чисел выбрать те, у которых цифры различны |