 |
Раздел описания типа.
|
|
|
|
Если пользователю, по каким либо причинам не хватает стандартных типов, то возможно определить типы по своему желанию.
Пример 1: Пусть нам нужно использовать тип с именем privat 1 в котором данные могут принимать только значения латинского алфавита начиная с буквы a и до буквы t. Определение этого типа можно записать в виде интервально определённого типа на основе стандартного типа char:
Type privat 1 =’a’..’t’;
Var lit,bukv:privat; {Выделены две ячейки памяти с именами lit, bukv, в которые можно занести только символы от a до t на основании предыдущего описания типа}
Пример 2: Определим перечисляемый тип для занесения названий месяцев.
Type month = (‘jan’,’fab’,’mar’,’apr’,’may’,’jun’,’jul’,’aug’,’sep’,’okt’,’nov’,’des’);
Var a,b,c:month;
Оператор присваивания. c:=a+b;
Слева от знака присваивания := указывается имя ячейки памяти, в которую нужно поместить значение. Под значением можно подразумевать значение константы, значение переменной (какого либо типа), значение вычисленного арифметического или логического или символьного или строкового выражения, или значение результата вычисления функции. В общем случае считается, что справа от знака присваивания помещается выражение.
Замечание: Тип имени ячейки памяти и тип выражения справа должны совпадать.
Оператор ввода. Readln(a,b,c);
Читать, набираемые через пробел данные с клавиатуры и занести их в последовательном порядке в ячейки a,b,c, после нажатия клавиши Enter.
Оператор вывода. Writeln(a,b,c);
Написать с новой строки на экране значения, извлечённые из ячеек a,b,c.
Замечание: Вместо имён ячеек памяти можно указывать символьные и текстовые константы, заключенные в кавычки ‘…………’. В этом случае на экран выводятся текстовые константы в том виде, в каком они помещены между кавычками. (Текстовые константы должны быть записаны латиницей.)
|
|
|
Простейшая программа. (вычисление с=а+в)
Program prim_1; {заголовок программы с именем prim_1}
Var a,b,c:real; {раздел описания переменных}
begin {начало раздела операторов}
writeln(‘input a,b’); {вывести на экран текстовую константу input a,b
(подсказка пользователю почему компьютер
остановился)}
readln(a,b); {компьютер остановился и ждёт набора значений a,b
(через пробел) c клавиатуры и занесение их в ячейки
с именами a,b (после нажатия клавиши Enter}
c:=a+b; {вычисление значения с и занесение результата в ячейку с}
writeln(‘c=’,c); {вывод на экран значения с в виде c= значение c}
readln; {компьютер остановился и ждёт нажатия клавиши Enter, на
экране при этом виден результат}
end. {конец работы программы}
Откроем приложение Delphi, создадим консольное приложение и запустим программу на выполнение.
Запустите приложение Delphi 7 по иконке или через ПУСК \все программы \ Delphi 7, выберете FIle\New\Other получите окно:
Нажмите Console Aplication \OK, Получите заготовку проекта (program Project2;) {Имя программы можно менять}
Наберите операторную часть программы например:
program Project1;
{$APPTYPE CONSOLE} {Директива компилятора {$APPTYPE CONSOLE}
Директива начинается с символа $ и свидетельствует о типе нашего приложения, и ее необходимо оставить без изменений.}
Uses SysUtils; {Использовать системные утилиты (здесь могут быть
перечислены указания какие блоки Delphi использовать)}
var a,b,c:real; begin
writeln('input a,b'); readln(a,b); c:=a+b; writeln('c=',c); readln; end.
Для запуска программы на выполнение нажмите Run\ Run или зелёный треугольник или f9 получите черное окно для решения и получения результатов:
Вводим через пробел значения a b (например 2.5 6.4)нажимаем enter получаем:
Нажав Enter вернемся в проект Delphi.
Проект можно сохранить: File\Save as… или File / Save Project As…Появится окно:
Набрав нужное имя (например Project0), нажмите «Сохранить». Проект сохранён и к нему можно получить доступFile\Open… получим окно, щёлкнув на Project0 открыть проект.
|
|
|
Лабораторная работа № 1. Разработка доцента кафедры информатики Скоб Ю.А.
|
|
|
A) простая, единая, целостная форма национально-государственного устройства, при которой территория государства подразделяется на административно-территориальные единицы.
E. движение ионов, разделение и изменение их концентрации в разных
II. Программа теоретического раздела дисциплины
III. МЕТОДИЧЕСКИЕ РЕКОМЕНДАЦИИ К ВЫПОЛНЕНИЮ ОТДЕЛЬНЫХ РАЗДЕЛОВ РАБОТЫ
III. Разделы, изученные ранее и необходимые для данного занятия (базисные знания)
IV. Порядок заполнения Раздела 1
IX. Порядок заполнения Раздела 6
IX. ПРАВИЛА БИБЛИОГРАФИЧЕСКОГО ОПИСАНИЯ
N Каждый раздел имеет свои подразделы и связи с другими частями экологии и смежными науками.
N Основные разделы современной экологии: общая (теоретическая) экология, биоэкология, геоэкология, экология человека и социальная экология, прикладная экология.
