|
|
Другие темы раздела | |
Turbo Pascal Квадрат Пифагора, найти количество одинаковых цифр в числе
https://www.cyberforum.ru/ turbo-pascal/ thread271255.html Вобщем, нужно 2 программы: 1)которая виводит на экран квадрат Пифагора 2) Дано натуральное число "n". Вычислить сколько раз в нем встречается число "а" помогите кто-то) |
Turbo Pascal Определить, является ли строка подстановкой n-ого порядка. С клавиатуры вводится число n - порядок подстановки, и затем таблица из двух строк. Определите, является ли эта таблица подстановкой n-ого порядка. Пример: 5 1 2 3 4 2 4 2 1 3 5 No _______ 5 1 5 3 4 2 4 7 1 3 5 |
Turbo Pascal Процедуры и функции. Семиугольник Прошу помогите пожалуйста... Найти семиугольник с координатами вершин (x1,y1),(x2,y2),...,(x7,y7). Вывести на печать координаты треуголтника с максимальной площадью. Определение площади треугольника по формуле Герона оформить в виде фунцкции. https://www.cyberforum.ru/ turbo-pascal/ thread271248.html | Turbo Pascal На сколько человек в восьмых классах больше, чем в десятых. Сведения об ученике состоят из его имени и фамилии и названия класса (года обучения и буквы), в котором он учится. Дан файл f, содержащий сведения об учениках школы. Выяснить, на сколько человек в восьмых классах больше, чем в десятых. В задаче должны быть использованы записи(record). https://www.cyberforum.ru/ turbo-pascal/ thread271238.html |
Вывести на экран количество попыток угадать число Turbo Pascal Программа угадайка генерирует случайные числа в пределах от 0 до 100 пользователь должен угадть его за 7 попыток program ygadaika; uses crt; var chu,pop:byte; chz:real; begin clrscr; randomize: chu:=0;pop:=0;chz:=int(random*100); writeln ('Компьтер загадал число от 0 до 100...'); writeln ('Вы должн угадать его за 7 попыток'); |
Turbo Pascal В N колхозах выращивают некоторые сельскохозяйственные культуры Из имеющегося перечня. Определить культуры: возделываемые во всех колхозах. В N колхозах выращивают некоторые сельскохозяйственные культуры Из имеющегося перечня. Определить культуры: возделываемые во всех колхозах. Решите пожалуйста)) https://www.cyberforum.ru/ turbo-pascal/ thread271226.html |
Turbo Pascal Движение изображения Мне нужно чтоб по экрану двигалось изображение. Обычно я использую тупой способ, рисую изображение, потом его стираю (setfillstule(1,0); bar.(0,0,1000,1000).), а потом рисую чуть левее или чуть правее. Это нормально работает, если в качестве изображения линия или точка. А если нужно быстро подвигать по экрану большое залитое изображение, то всё будет ужасно мигать. Подскажите более рациональный... https://www.cyberforum.ru/ turbo-pascal/ thread271220.html |
Turbo Pascal написать программу для перевода велечин из однойц еденицы измерения в др написать программу для перевода величин из одной единицы измерения в др Соотношения единиц считываются из файла. при вводе значений одной единицы измерения сразу отображается значение др. единиц той же размерности (длина площадь , вес , температура и т.д ) программа работает в текстовом режиме |
Turbo Pascal Напишите программу, использующую функцию, которая вычисляет доход по вкладу
https://www.cyberforum.ru/ turbo-pascal/ thread271215.html 15. Напишите программу, использующую функцию, которая вычисляет доход по вкладу. Параметрами функции являются величина вклада, процентная ставка и срок вклада. Процентная ставка (% годовых) и время хранения (дней) задаются во время работы программы. Рекомендуемый вид экрана: Введите исходные данные: Величина вклада (руб.) = Срок вклада (дней)= Процентная ставка (годовых)= Доход …………руб. ... |
Turbo Pascal Сортировка прямыми вставками без барьера Здравствуйте, помогите с сортировкой прямыми вставками без барьера. С барьером программу написал, нужно предложить альтернативу барьеру. Помогите советом. Вот программа: uses crt; const n=4; type mas=array of integer; var a:mas; https://www.cyberforum.ru/ turbo-pascal/ thread271210.html |
Turbo Pascal вычисления значения функции y = f(x) СРОЧНО!!!Помогите составить программу вычисления значения функции y = f(x) c использованием операторов условных переходов. . |
Turbo Pascal Работа с мышью Мне нужно сделать программу такого плана, при запуске передо мной появляется меню из 4 пунктов, когда я выбираю один из пунктов выполняется определённый раздел программы. Но проблема в том, что пункт нужно выбрать мышью, а я о работе с мышью не знаю ничего. Объясните, пожалуйста, как работать с мышью. https://www.cyberforum.ru/ turbo-pascal/ thread271198.html |
Фрилансер
|
|||||||||||
06.04.2011, 20:19 | 0 | ||||||||||
массивы - Turbo Pascal - Ответ 152685906.04.2011, 20:19. Показов 528. Ответов 7
Метки (Все метки)
Ответ
вместо
Вернуться к обсуждению: массивы Turbo Pascal
1
|
06.04.2011, 20:19 | |
Готовые ответы и решения:
7
Даны массивы а и b. Получить новые массивы a и b, элементы которых вычисляются по правилу: ai=bi, bi= -ai Файлы. Компоненты - массивы чисел. Переформировать файл, где сначала идут массивы с положительными макс. элементами Даны массивы A(8), F(8),Q(8). Сформировать массивы С(8), каждый элемент которого вычисляется по формуле Упорядочить массивы по по убыванию, потом соединить массивы в один упорядоченный массив |
06.04.2011, 20:19 | |
06.04.2011, 20:19 | |
Помогаю со студенческими работами здесь
0
Табулирование функции и поиск данных. Одномерные массивы. Двумерные массивы Массивы. Циклические алгоритмы (Заполнить массивы случайными числами, лежащими в интервале 0 до 100) Указатели и массивы. Индексация с помощью указателей. Передача массивов в функции. Динамические массивы (обработка матриц) Попадание точки. Массивы чисел. Массивы записей. Структуры, массивы, указатели, динамические массивы структур Многомерные массивы, как перебирать внутренние массивы |