write (x:p:q); writeln(y:p:q);,

где x, y – выражения вещественного типа,

p – ширина поля вывода всего числа,

q –ширина поля вывода дробной части числа, при этом 0≤q≤24.

Если q=0, то ни дробная часть, ни десятичная точка на экран не выводятся.

Если q>24, то число выводится в формате с плавающей точкой.

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

1) если x≥0.0, то используется формат

 #.# # # # # # # # # # # E*# #

2) если x<0.0, то формат имеет вид

 - #.# # # # # # # # # # E*# #

 

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

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

Переменная и выражение должны быть совместимы по типу.

Структура:

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

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

Графически оператор присваивания изображается в виде прямоугольника:

Пример: Вычислить гипотенузу треугольника, если катеты известны: a=3, b=4.

Блок-схема	Программа
	program Pr1; uses crt; const A=3; B=4; var C: real; begin clrscr;{очистка экрана} c:=sqrt(sqr(A)+sqr(B)); write(‘Гипотенуза равна’, C:6:0); end.

 

2.1.6. Оператор ввода.

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

Операторы ввода обеспечивают ввод числовых данных, символов, строк и т.д. для последующей их обработки программой.

Структура:

read(список переменных);или readln(список переменных);.

Графически оператор ввода изображается, как и оператор вывода в виде параллелограмма:

 

 

Оператор компьютером выполняется следующим образом: машина приостанавливает работу и ждет ввода значений указанных данных. Значения набираются минимум через один пробел на клавиатуре и высвечиваются на экране. После набора последнего значения нажимается клавиша ввода Enter. Значения переменных вводятся в строгом соответствии с синтаксисом языка Паскаль.

Оператор readln(список переменных); аналогична оператору read(список переменных);, единственное отличие в том, что после считывания последнего в списке значения курсор автоматически переходит на следующую строку.

Оператор readlnтакже можно использовать без параметров, тогда происходит приостановка работы компьютера до нажатия клавиши Enter. Используется, для того чтобы сразу просмотреть результаты вычислений программы.

Пример: Вычислить гипотенузу треугольника, если известны катеты.

Постановка задачи:

Дан прямоугольный треугольник, катеты которого известны: A, B.

Найти гипотенузу: C.

Анализ задачи:

Для решения задачи используем теорему Пифагора: откуда

Переменные a и b могут быть как целого, так и вещественного типа: . Переменная c также вещественного типа, так как при ее вычислении используется квадратный корень:

 

Алгоритм: Блок-схема решения данной задачи.

 

 

Программа:

program Pr1;

uses crt;

var A,B,C: real;

begin

clrscr;{очистка экрана}

writeln(‘Введите A и B’);

readln(A, B);

c:=sqrt(sqr(A)+sqr(B));

write(‘Гипотенуза равна’, C:6:0);

readln;

end.