|
|
Другие темы раздела | |
Free Pascal Почему не работает? program Pr2; const n1 = 15; type massiv = array of integer; var a: massiv; https://www.cyberforum.ru/ free-pascal/ thread1728668.html |
Ошибка "Нет перегруженной подпрограммы с такими типами параметров" Free Pascal компилятор ругается на 8 строчку program основная_тригонометрическая_формула; uses crt; var x, y, z : real; begin writeln ('Введите значение x'); readln (x); begin sqr((sin(x))+sqr(cos(x))=1); |
Free Pascal Ввод времени суток в формате hh:mm с ограничением ввода Ввод времени суток в формате hh:mm с ограничением ввода. ввод кроме цифр блокируется(при нажатии буквы она не отображается на экране); по нажатии enter читать время https://www.cyberforum.ru/ free-pascal/ thread1728214.html | Free Pascal Получить файл h, в котором каждая нечётная стока - из файла f, каждая чётная строка - из файла g Даны текстовые файлы f и g. Получить файл h, в котором каждая нечетная стока - из файла f каждый четный строка - из файла g. https://www.cyberforum.ru/ free-pascal/ thread1727748.html |
Free Pascal Написать модуль обработки комплексных чисел Написать модуль обработки комплексных чисел. Модуль должен включать в себя следующие подпрограммы: – функцию создания комплексного числа в динамической памяти; – функцию сложения двух комплексных чисел; – функцию вычитания двух комплексных чисел; – функцию умножения двух комплексных чисел; – функцию деления двух комплексных чисел; – функцию возведения комплексного числа в квадрат; –... |
Free Pascal Разве бывает 2 Begin? Пробую сделать САМ СВОЕ меню. Для этого отовсюду собираю разные образцы и варианты. И вот попался какой-то любопытный вариант с двумя begin'ами. { from bpascal.ru} Uses CRT; Const MaxMenuItem = 4; Var Ret : Byte; Function MainMenu(R_Select:Byte):Byte; Type TMenu = record X,Y : Byte; https://www.cyberforum.ru/ free-pascal/ thread1726978.html |
Free Pascal Перевод систем счисления Исходный текстовый файл содержит числа в шестнадцатеричной системе счисления, отделенные друг от друга хотя бы одним пробелом. Составить программу, которая под каждым шестнадцатеричным числом в файле указывает его значение в десятичной системе счисления, например 237 4C 0 D 567 76 0 13 https://www.cyberforum.ru/ free-pascal/ thread1726680.html |
Free Pascal паскаль Дано текстовий файл f. Додати букву S у початок кожного рядка текстового файлу. (паскаль) Помогите, пожалуйста. |
Free Pascal Найти год выше, ниже или равный заданному (синтаксический анализатор) Помогите найти ошибку - нужно осуществить поиск года , пишет что входная строка имеет неверный формат. uses crt; Type library1 = record author,book:string; year,code,place:integer; end; Var STR : text; https://www.cyberforum.ru/ free-pascal/ thread1726272.html |
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 |
2386 / 1298 / 1492
Регистрация: 29.08.2014
Сообщений: 4,661
|
|
12.05.2016, 10:24 | 0 |
Машина должна угадать загаданное число - Free Pascal - Ответ 912862512.05.2016, 10:24. Показов 1173. Ответов 2
Метки (Все метки)
Ответ
Алгоритм нахождения числа в игре Быки и Коровы
Вернуться к обсуждению: Машина должна угадать загаданное число Free Pascal
0
|
12.05.2016, 10:24 | |
Готовые ответы и решения:
2
Играющему нужно угадать загаданное число за минимальное количество вопросов Игра "Угадать загаданное число от 1 до 100" (пояснить/изменить/дописать). Формы Угадать слово, загаданное компьютером Пользователь загадывает число от 1 до 100, а программа должна его угадать |
12.05.2016, 10:24 | |
12.05.2016, 10:24 | |
Помогаю со студенческими работами здесь
0
Машина Тьюринга должна выдать 0, если число нулей больше и 1 – в противном случае загаданное число Отгадать загаданное число Отгадать число загаданное программой |