|
|
| Другие темы раздела | |
|
Free Pascal Сортировка массива по убыванию
https://www.cyberforum.ru/ free-pascal/ thread410529.html Нашла на вашем сайте программку. Помогите, пожалуйста, ее переделать, чтобы программа была написана с использованием подпрограмм и включала бы как минимум две подпрограммы: формирование массива и его вывод на экран. Сама пыталась разбить, но вылазит куча ошибок( Помогите, пожалуйста, буду очень признательна: uses crt; const nmax=20; var a:array of real; n,m,i,j,l:byte; mn,b:real;... |
В центрі екрану з'являється зафарбований квадрат ( розмір сторони 20 пікселов ) Free Pascal 1) В центрі екрану з'являється зафарбований квадрат ( розмір сторони 20 пікселов ). 2) Квадрат повертається на 45 градусів, одночасно збільшуючи розмір сторони на 50 відсотків. 3) Пункт 2) повторюється до тих пір, поки вершини квадрату не досягнуть країв екрану. Квадрат зникає та зафарбовує своїм кольором весь екран. 4) Пункти 1) та 3) повторюються після зміни кольору.Официальным языком форума... |
|
Free Pascal OpenGL unit
https://www.cyberforum.ru/ free-pascal/ thread410449.html В общем была программа, потом решил вынести ненужный код в отдельный модуль, что бы потом его использовать просто как тот же граф или крт пишет нету такого gl, захожу в папочку pengl, все там лежит, и glu и gl, указываю путь из паскаля, и не видит эти файлы. Как можно исправить такое? |
Free Pascal Cумма бесконечного ряда с точностью Составить программу вычисления суммы бесконечного ряда с точность EPS. ((-1)^(n-1)) / ((n^3)+1) Значение EPS вводится с клавиатуры. n меняется от 1 до бесконечности. Помогите пожалуйста. Заранее спасибо! =) https://www.cyberforum.ru/ free-pascal/ thread410350.html |
|
Free Pascal Добавить в указанное место файла заданное количество строк, начиная с указанного места другого файла. Место задаётся номером строки. Добавить в указанное место файла заданное количество строк, начиная с указанного места другого файла. Место задаётся номером строки. |
Free Pascal Строки задны М строк символов, которые вводятся с клавиатуры. Каждая строка представляет собой английское слово. Найти все слова которые заканчиваются на одну и туже букву. Добавлено через 2 часа 47 минут ребят ну плз нужна срочно помошь https://www.cyberforum.ru/ free-pascal/ thread409998.html |
| Free Pascal Подсчитайте среднее арифметическое элементов списка Дан список случайных целых чисел. Переверните список, т.е. расставьте все числа в обратном порядке. Подсчитайте среднее арифметическое его элементов! https://www.cyberforum.ru/ free-pascal/ thread409826.html |
Подсчитать количество выводов определенной строки текста Free Pascal Подскажите пожалуйста, есть программа которая задает вопросы, например - "Какой формы земля?" И она выводит этот вопрос до тех пор, пока человек не введет правильный ответ. И мне нужно посчитать общее количество выводов вот этой строчки writeln ('Слово введено неверно или вообще не введено!!! Будьте внимательны при вводе.'); за всю программу, можно ли это как-то реализовать? program... |
|
Free Pascal исправить ошибки в программе по текстовым файлам
https://www.cyberforum.ru/ free-pascal/ thread409625.html Задание: сначала создать текстовый файл, в который записать квадратный массив, а затем прочитать из созданного файла все диагонали, параллельные побочной. Программа выдает ошибку exitcode=201 Пожалуйста, помогите разобраться в чем ошибка Program V; Uses Crt; Const n = 5; Var i, j : integer; |
Free Pascal Улитка Паскаля, заданная параметрически,
https://www.cyberforum.ru/ free-pascal/ thread409543.html Написать программу построения изображения, представленного на следующем рисунке. Улитка Паскаля, заданная параметрически, x=acos^2+bcost y=acostsint+bsint , t=, a,b>0, a>b поворачивается N раз вокруг некоторого центра. Эта программа рисует Улитку Паскаля, но я не знаю как её вращать. program... |
|
Вывод спрайтов (объясните) Free Pascal Читал книгу Сухарева, главы про модуль GRAPH.TPU пропустил, сейчас возникла надобность в работе со спрайтами, книга у друга (в Москве, сам в Питере), прошу объяснить, как работать со спрайтами). Всё:) |
Free Pascal не выводит на экран список после удаления помогите найти ошибку не выводит на экран список после удаления. не знаю почему!!!! условие : Сформировать список целых чисел и удалить из него все четные числа. текст Uses Crt; type ss = ^natchislo; natchislo = record inf : word; next : ss; https://www.cyberforum.ru/ free-pascal/ thread408632.html |
|
Ehl0448
|
|
| 0 | |
Чему будет равны значения переменных a, b, c после выполнения фрагмента алгоритма? - Free Pascal - Ответ 229917718.12.2011, 14:53. Показов 3453. Ответов 2
Метки (Все метки)
1. Чему будет равны значения переменных a, b, c после выполнения фрагмента алгоритма? a:=15; b:=7; c:=25; если a>b то b:=a все если c>b то a:=c-b все если a+b>c то c:=b+a все 2. Вычислите результат выполнения фрагмента алгоритма: n:=19; s:=0; нц для i от 2 до mod(n, 7) s:=s+div(n, i) n:=div(n, 2) кц Вернуться к обсуждению: Чему будет равны значения переменных a, b, c после выполнения фрагмента алгоритма? Free Pascal |
|
| 18.12.2011, 14:53 | |
|
Готовые ответы и решения:
2
Определить, чему будут равны элементы массива после выполнения фрагмента программы Чему будут равны элементы этого массива после выполнения фрагмента программы? Чему будет равно значение A[25] после выполнения фрагмента программы? Чему будет равны значения переменных a, b, c после выполнения фрагмента алгоритма |
| 18.12.2011, 14:53 | |
| 18.12.2011, 14:53 | |
|
Помогаю со студенческими работами здесь
0
Чему будет равно значение переменной d после выполнения фрагмента алгоритма? Чему будут равны значения переменных после завершения фрагмента программы? Чему будут равны значения переменных после завершения фрагмента программы? Чему будут равны значения операндов a, b, c, d, n, k, m после выполнения нижеприведенного фрагмента программы |