|
|
Другие темы раздела | |
Turbo Pascal Переделать функцию в процедуру Посогите переделать функцию в процедуру type mas = array of real; vybor = (min, max); var z: real; x,y: mas; procedure form_mas(var a: mas); https://www.cyberforum.ru/ turbo-pascal/ thread112928.html |
Turbo Pascal В строке записаны слова и целые положительные числа, не превышающие значения 3000. Заменить каждое число его представлением в римской системе В строке записаны слова и целые положительные числа, не превышающие значения 3000. Заменить каждое число его представлением в римской системе счисления. То же, что 5.27, но в качестве возможной ошибки рассматривать замену одной буквы. Введённая строка представляет собой формулу. Определить, является ли формула корректной относительно использованных в её записи скобок.(с подпрограммой) |
Turbo Pascal Для каждого из слов указать, сколько раз оно встречается в тексте.
https://www.cyberforum.ru/ turbo-pascal/ thread112923.html Для каждого из слов указать, сколько раз оно встречается в тексте. |
Turbo Pascal В заданном предложении указать слово, в котором доля согласных максимальна. Считать, что слова в тексте отделены друг от друга одним пробелом.С исполь Помогите ПЛИЗ!!!! В заданном предложении указать слово, в котором доля согласных максимальна. Считать, что слова в тексте отделены друг от друга одним пробелом.С использованием подпрограммы. https://www.cyberforum.ru/ turbo-pascal/ thread112922.html |
Создать файл на диске Turbo Pascal Создать пустой файл на диске и напечатать в нём таблицу Во вложении файл который должен получиться |
Turbo Pascal Дана символьная строка. Определить длину самой длинной подстроки из подряд идущих букв "а" Дана символьная строка. Определить длину самой длинной подстроки из подряд идущих букв "а" https://www.cyberforum.ru/ turbo-pascal/ thread112908.html |
Turbo Pascal Наберите программу, которая выводит на экран текст.
https://www.cyberforum.ru/ turbo-pascal/ thread112907.html дано задание : 3. Наберите программу, которая выводит на экран текст: Лабораторная работа №10 студентки гр. ЭФ-92 Пановой Елены 4. Подключите модуль CRT, для этого в начале программы после её имени напишите Uses CRT. 5. Вставьте в программу процедуру очистки экрана. 6. Задайте цвет фона и цвет символов, с помощью процедур... |
Определите на какие товары повысились цены и на сколько процентов. Turbo Pascal Создайте файл, содержащий записи следующей структуры: наименование товара, старая цена, новая цена. Определите на какие товары повысились цены и на сколько процентов. Решите умоляю !!! Если можете, то сделайте с подпрограммами - процедуры и функции, а ещё с модулями - 1 или 2 !!! |
Turbo Pascal Не знаю как сделать блок-схему
https://www.cyberforum.ru/ turbo-pascal/ thread112873.html Program Final; Uses crt; Function Prost(a:word): boolean; Var i: word; begin for i:=2 to round (sqrt(a)) do if a mod i=0 then Prost:=false; end; |
Turbo Pascal программа, находящая в заданном массиве все простые числа
https://www.cyberforum.ru/ turbo-pascal/ thread112855.html Написать программу, находящую в заданном массиве все простые числа. Проверку оформить в виде логической функции пожалуйста помогите |
Turbo Pascal В каждом слове текста удалить минимальное количество символов так, чтобы в преобразованном слове не было повторяющихся символов. В каждом слове текста удалить минимальное количество символов так, чтобы в преобразованном слове не было повторяющихся символов. |
Turbo Pascal Найти периметр равнобедренного треугольника по его основанию и высоте Описать функцию TriangleP (a, h), находящую периметр равнобедренного треугольника по его основанию a и высоте h, проведенной к основанию (a и h — вещес https://www.cyberforum.ru/ turbo-pascal/ thread112826.html |
0 / 0 / 0
Регистрация: 14.11.2009
Сообщений: 31
|
|
05.04.2010, 19:00 [ТС] | 0 |
Найти из всех четырехзначных чисел, такие числа, в записи которых все цифры различны - Turbo Pascal - Ответ 64257305.04.2010, 19:00. Показов 2636. Ответов 5
Метки (Все метки)
Ответ
Да, это одна программа. Сначала просто условие как это делать...
Вернуться к обсуждению: Найти из всех четырехзначных чисел, такие числа, в записи которых все цифры различны Turbo Pascal
0
|
05.04.2010, 19:00 | |
Готовые ответы и решения:
5
Написать программу, которая находит из всех четырехзначных чисел, такие числа, в записи которых все цифры различны В интервале чисел натурального ряда от a до b найти все двузначные числа, в записи которых все цифры различны Среди всех четырехзначных цифр определить число тех, у которых все цифры различны Среди четырехзначных чисел выбрать те, у которых все четыре цифры различны. |
05.04.2010, 19:00 | |
05.04.2010, 19:00 | |
Помогаю со студенческими работами здесь
0
Вычислить количество четырехзначных чисел, делящихся на 5, у которых все цифры различны. Среди четырехзначных чисел выбрать те, у которых все четыре цифры различны Среди четырехзначных чисел выбрать те, у которых все четыре цифры различны Найти кратные пяти натуральные четырёхзначные числа, в записи которых все цифры различны |