Шахматную доску будем представлять в виде квадратного символьного массива размера 8×8. Даны натуральные числа v1 и g1, указывающие номера вертикали (при счете слева направо) и горизонтали (при счете снизу вверх) для поля, на котором стоит белая шахматная фигура, и числа v2 и g2 – указывающие соответствующие координаты второй черной фигуры (1v≤1≤8, 1g≤1≤8, 1≤v2≤8, 1≤g2е≤8). Определить поля (отметить их символом «+»), на которые может пойти первая фигура, не попав под удар второй фигуры. Рассмотреть следующие варианты сочетаний первой и второй фигур:конь и слон — Pascal(Паскаль)

Read More

Поиск всех делителей натурального числа — Pascal(Паскаль)

Натурáльные чи́сла (от лат.naturalis «естественный») — числа, возникающие естественным образом при счёте (1, 2, 3, 4, 5, 6, 7 и так далее…). Последовательность всех натуральных чисел, расположенных в порядке возрастания, называется натуральным рядом. Ниже рассмотрен пример поиска всех делителей натурального числа на Pascal.

Read More

Процедура AssignCrt — Pascal(Паскаль)

Модуль WinCrt Связывает текстовый файл с окном CRT. Объявление: Режим: Замечание: AssignCrt работает точно также как стандартная процедура Assign за исключением того, что не определяется имя файла. Вместо этого, текстовый файл связывается с окном CRT. Это позволяет выводить (и вводить) информацию быстрее, чем при использовании стандартного вывода (или ввода). Пример:

Read More

Процедура Assign — Pascal(Паскаль)

Процедура Assign(F; Name) назначает файловой переменной F имя внешнего файла Name. Объявление: Режим: Замечание: Параметр F — файловая переменная любого файлового типа, а Name — выражение со строковым типом или выражение типа PChar, если допускается расширенный синтаксис. Все дальнейшие операции с переменной F на самом деле происходят с внешним файлом с именем Name. После обращения к Assign, связь между переменной F и внешним файлом продолжает существовать до тех пор, пока для переменной F не будет сделано еще одно переназначение. Имя файла состоит из пути — нулевого или большего количества имен…

Read More

Процедура Arc — Pascal(Паскаль)

Процедура Arc(X, Y, StAngle, EndAngle, Radius) рисует дугу окружности из точки с координатами XY начиная с угла StAngle и заканчиваю в EndAngle радиусом Radius. Объявление: Режим: Ограничения: Нужно быть в графическом режиме. Пример:

Read More

Процедура Append — Pascal(Паскаль)

Модуль CRT Процедура Append(F, ‘TEST.TXT’) открывает существующий файл «TEST.TXT» для продолжения записи в файл. Объявление: Режим: Замечание: Параметр F — переменная текстового файла, которая должна быть связана с внешним файлом при помощи вызова процедуры Assign. Append открывает существующий внешний файл с именем, определенным в файловой переменной F. Если внешний файл с данным именем не существует, то происходит ошибка ввода/вывода. Если F уже открыт, то он закрывается и вновь открывается. Текущая позиция файла устанавливается на конец файла. Если в последнем 128-байтовом блоке файла присутствует символ Ctrl+Z (символ, с кодом 26), то…

Read More