Моя первая программа

Если после предложения нужно вывести какое-либо значение переменной, то после закрывающего апострофа нужно поставить запятую и указать имя переменной.

Например, если переменная Y имела значение 16, т.е. Y=16, то оператор

Write(‘Число шестнадцать записывается так: ’,Y);

Выведет на дисплей монитора надпись:

Число шестнадцать записывается так: 16

т.е. сначала выведется предложение заключённое в апострофы, а затем выведется значение переменной.

Можно также вставлять переменную в предложение, выделяя данную переменную запятыми.

Например, если Y=16, то оператор

Write(‘Мне ’,Y,’ лет’);

Выведет надпись:

Мне 16 лет

Для вывода вещественных чисел в привычном для нас формате можно использовать следующий формат:

Write(n:s:d);

Здесь n – это переменная вещественного типа;

s – количество позиций для вывода значения переменной n;

d – дробная часть выводимого числа (а точнее количество знаков после запятой).

Операторы Read и Readln выполняют одну и туже функцию – осуществляют ввод данных. Различие состоит в том, что оператор Readln осуществляет ввод данных с новой строки.

Оператор Write выводит строку и оставляет курсор в конце данной строки. Оператор Writeln выводит строку и переводит курсор на начало новой строки.

Оператор присваивания.

В Паскале в качестве оператора присваивания служит пара символов :=.

Формат оператора:

<идентификатор>:=<выражение>;

В качестве выражения может быть использовано:

<идентификатор>:=<числовая константа>;

<идентификатор>:=<символьная константа>;

<идентификатор>:=<строковая константа>;

<идентификатор>:=<числовая переменная>;

<идентификатор>:=<символьная переменная>;

<идентификатор>:=<строковая переменная>;

<идентификатор>:=<арифметическое выражение>;

Принцип действия оператора присваивания:

Идентификатору стоящему слева от знака присваивания присваивается значение специального выражения стоящего справа от знака присваивания.

Обратите внимание, что сначала вычисляется специальное выражение стоящие справа от знака присваивания, а затем, значение этого выражения присваивается идентификатору стоящему слева от знака присваивания.

Следует учитывать также и то, что идентификатор и специальное выражение должны принадлежать одному и тому же типу.

Приведём пример простой программы с использованием оператора присваивания, в которой вычисляется сумма двух введённых с клавиатуры чисел.

Программа 1

Program My_Program_1;

Var x,y,z:integer;

Begin

Write(‘Введите первое число: ’);

Readln(x);

Write(‘Введите второе число:’);

Readln(y);

z:=x+y;

Write(‘Сумма чисел ’,x,‘ и ’,y,‘равна =’,z);

End.

Нажмите клавишу F9. Выполнится компиляция программы. Если компилятор не сообщил Вам о наличии ошибок, то нажмите комбинацию клавиш Ctrl+F9 и запустите программу на выполнение. После выполнения программы нажмите комбинацию клавиш Alt+F5 и просмотрите полученный результат.

Дадим пояснения к программе. После служебного (зарезервированного) слова Program следует имя программы. Далее в разделе описания переменных, после слова Var, мы перечисляем все переменные, которые присутствуют у нас в программе с указанием типа переменных. В данном случае мы указали, что все наши переменные будут иметь целый тип.

Затем начинается основное тело программы, заключённое в операторные скобки Begin…End. Выполняется оператор вывода Write, который выводит на экран надпись «Введите первое число:». Затем выполняется оператор Readln, который ожидает пока Вы введёте какое-либо число, которое запомнится в переменной х. Затем аналогично срабатывают вторые операторы Write и Readln.

После того, как введённые значения запомнились в переменных, они подставляются в выражение x+y и вычисляется сумма этих чисел. Полученный результат присваивается переменной z. Затем выполняется оператор Writeln, который выводит соответствующую надпись, подставляя вместо x и y введённые значения, а вместо z полученную сумму.