Главная » Статьи для тега "Writeln"

Модуль System Free Pascal

Добавлено Дата: 10 July, 2014 категория: Free Pascal

Базовый набор для вычисления элементарных функций (табл. 13.1) и выполне- ния некоторых вспомогательных операций (табл. 13.2) входит в состав модуля Sys- tem, на автомате подключаемого к каждой программе.

Таблица 13.1. Элементарные функции модуля System

Читать »

Выделение памяти локальным и глобальным массивам Free Pascal

Добавлено Дата: 4 July, 2014 категория: Free Pascal

Программа matrix_4 демонстрирует тактику выделения памяти для глобальных массивов — статического sa1 и динамического ds1 (листинг 6.8). Массиву sa1 па- мять выделяется сразу и всем его элементам присваиваются нулевые значения. Для массива ds1 сначала выделяется 4-байтовый указатель, в который заносится Nil. После первого обращения к процедуре SetLength массиву ds1 выделяется чистая память. При повторном обращении к процедуре SetLength массиву ds1 выделяет- ся новая память, в которую копируются накопленные ранее данные, а хвост — чистится. Функция SizeOf для статического массива выдает объем занятой памяти в байтах, для динамического — только объем памяти, занятой указателем. Функция Length выдает длину любого массива в количестве элементов.

Читать »

Определение длины и размеров массивов Free Pascal

Добавлено Дата: 21 June, 2014 категория: Free Pascal

Под термином "длина одномерного статического массива" обычно понимают объем оперативной памяти в байтах, занятых элементами массива.

var

Для определения этой характеристики обычно прибегают к функции SizeOf:

sa1: array [3..15] of double; begin

Читать »

Преобразования угловых величин Free Pascal

Добавлено Дата: 7 May, 2014 категория: Free Pascal
 

Кроме широко используемых градусов (degrees) и радиан (radians) в различных разделах науки и техники применяют и другие единицы измерения углов. Среди них чаще других встречаются грады (grads) и обороты (cycles). Град или метриче- ский градус был введен в обиход в конце XVIII века во Франции при переходе на метрическую систему мер. Было принято, что в прямом угле содержится 100 гра- дов. В один град входило 100 метрических минут, каждая метрическая минута со- держала 100 метрических секунд. Метрические единицы измерения углов упроща- ли вычисления, связанные с артиллерийскими расчетами, и до сих пор в технических характеристиках наземных и морских орудий можно встретить значе- ния минимальных и максимальных углов наклона ствола в градах. В инженерном формате Калькулятора Windows один из переключателей задания углов — Грады. Обороты или циклы используются в механике и физике для измерения углов и фаз. Один оборот соответствует повороту на 360 .

Читать »

Пример игры "Крестики-нолики"

Добавлено Дата: 21 January, 2011 категория: Игры, Исходники

Напомним правила: игра идет на квадратном поле 3×3 клетки. Игроки по очереди ставят в клетках крестики (один) и нолики (другой). Выигрывает тот, кто первым замкнул линию (вертикальную, горизонтальную, диаго­нальную — неважно). Программа написана на языке Turbo Pascal 7 (см. листинг П1.1). Вывод осуществляется в текстовом режиме.

Читать »