|
|
Другие темы раздела | |
Free Pascal Типизированный файл, корректировка полей
https://www.cyberforum.ru/ free-pascal/ thread1726151.html ребята!!! помогите с процедурой redactor (корректировка полей) не знаю как ее написать, если можно то с комментариями :) type pred=record inf:integer; dm:integer; mat:integer; al:integer; end; ses = record |
Написать программу, которая выдает таблицу изменения концентрации спирта Free Pascal 5. В химической лаборатории стояла литровая бутылка чистого спирта концентрации 96 процентов. Каждую неделю лаборантка Терпилова отливала из бутылки треть для протирки клавиатур компьютеров. Так она потом объясняла, куда делся спирт. Недостающую часть лаборантка заливала водой. Написать программу, которая выдает таблицу изменения концентрации спирта. Узнать, сколько же раз лаборантка отливала из... |
Free Pascal Программа должна определить, какие сочетания карт дают в сумме вес 21 4. Есть такая тюремная игра. «Двадцать одно» называется. Каждая карта в этой игре имеет свой вес. Карты без картинок начинаются с «шестерки» и имеют вес, соответствующий номеру. Например, «де-вятка» имеет вес 9. Карты с картинками имеют такие веса. «Валет» - 2, «Дама» - 3, «Король» - 4. «Туз» весит 11. Пусть в колоде только одна масть. Программа должна определить, какие сочетания карт дают в... https://www.cyberforum.ru/ free-pascal/ thread1725380.html |
Free Pascal Переписать текст из входного файла в выходной файл в обратном порядке
https://www.cyberforum.ru/ free-pascal/ thread1725379.html 3. Входной файл содержит русский текст. Программа записывает текст из входного файла в выходной файл в обратном порядке. |
Free Pascal Собрать сведения об изменениях курса и цены за последний год 2. Вы, наверное, заметили такой факт. Чем ниже долларовая цена нефти, - тем выше курс доллара. Надо собрать сведения об изменениях курса и цены за последний год, тем самым получить два одинаковых по длине одномерных массива. Программа должна вычислить массив рублевых цен на нефть и найти её среднее значение за год. |
Free Pascal Начисление пенсии для Буратино 1. Буратино весь свой трудовой стаж провел в литейном цехе. Про-работал он там 20 лет. За это время светлое полено, из которого он был сделан, местами потемнело от окалины, местами выгорело. Потерял, короче, Буратино на работе всё своё деревянное здоровье. Пришел он в отдел социального обеспечения, чтобы, значит, ему там пенсию начислили. А там уже давно обосновались лиса Алиса и кот Базилио. Вот... https://www.cyberforum.ru/ free-pascal/ thread1725376.html |
Free Pascal Несоответствие типов в программе и модуле при использовании множеств
https://www.cyberforum.ru/ free-pascal/ thread1725095.html Нужно было написать программу, которая выбирает определенные числа из множества Х в множество Y (нечетные или делящиеся на 17) . Ввод и вывод происходит в главной программе. uses crt, module12; type m = set of byte; var X, Y:m; ... begin ((ввод множества X)); proc1(X,Y); |
Free Pascal Вычислить функцию Y при заданном значении аргумента 1) Определить декларативную часть предложенной программы. Набрать программу на ПК. Составить блок-схему к программе. A=9 D=36-A Writeln (A,D) 2) Составить блок – схему и написать программу, вычисляющую функцию Y при заданном значении аргумента. Ввести программу в ЭВМ и по полученным данным построить график: (Использую Фри паскаль) |
Free Pascal Подсчитать новые координаты треугольника, повернутого на заданный угол
https://www.cyberforum.ru/ free-pascal/ thread1724765.html Матрица поворота вектора на плоскости имеет следующий формат(Смотрите изображение ниже): С клавиатуры вводятся координаты трех вершин треугольника и угол поворота в градусах. Программы подсчитывает новые координаты треугольника, повернутого на заданный угол, и печатает их в кон-сольном окне. |
Free Pascal Определить, является ли введенная с консоли строка палиндромом
https://www.cyberforum.ru/ free-pascal/ thread1724761.html Программа определяет, является ли введенная с консоли строка симметричной. Например, строка «казак» симметрична. Её можно одинаково прочитать слева направо и справа налево. |
Free Pascal По номеру года определить и напечатать его название (восточный календарь) В старом японском календаре был принят 60-летний цикл. Как раз для выхода на пенсию. Он состоял из пяти 12-летних вложенных циклов. 12 × 5 = 60. Вложенные циклы обозначались названиями цветов: зеленый, красный, желтый, белый, черный. Внутри каждого вложенного цикла год носил название животного: крысы, коровы, тигра, зайца, дракона, змеи, лошади, овцы, обезьяны, петуха, со-баки и свиньи. 1984-й... |
Free Pascal Печать всех перестановок чисел от 1 до 5 Программа печатает все перестановки чисел от 1 до 5. https://www.cyberforum.ru/ free-pascal/ thread1724758.html |
396 / 371 / 111
Регистрация: 03.02.2013
Сообщений: 1,131
|
|
03.05.2016, 05:17 | 0 |
Найти год выше, ниже или равный заданному (синтаксический анализатор) - Free Pascal - Ответ 909697503.05.2016, 05:17. Показов 769. Ответов 3
Метки (Все метки)
Ответ
хм... что за поиск года? в чём суть задачи то? обратитесь к телу main(), там типа три случая только, никаких 4-6, прошёлся по процедурам вокруг - никаких поисков годов, мне кажется вам стоило спросить о главном вопросе жизни, вселенной и вообще
но начните с форматирования кода Вернуться к обсуждению: Найти год выше, ниже или равный заданному (синтаксический анализатор) Free Pascal
0
|
03.05.2016, 05:17 | |
Готовые ответы и решения:
3
Найти равный или максимально близкий элемент массива к заданному значению Найти элемент массива, равный заданному числу Х или сообщить о его отсутствии Синтаксический анализатор, найти ошибки Заменить нулями элементы, лежащие одновременно выше/ниже главной диагонали и выше/ниже побочной |
03.05.2016, 05:17 | |
03.05.2016, 05:17 | |
Помогаю со студенческими работами здесь
0
Найти элемент массива, равный заданному числу Переход на каталог выше или ниже Стереть фигуру выше или ниже линии Находится ли график выше или ниже относительно другого |