2 Формы:

WRITE - без редактирования потока информации WRITELN -вывод информации с каждой строки

Оператор ввода информации. READ (через пробел) READLN (ввод инфо через кл. ENTER

WRITELN ('a', a); За ключевым словом writein круглая скобка, в скобках элементы вывода, отделяющиеся запятой в этом примере. 2 элемента вывода:

1 эл. - текст const=a_ ( в апострофах)

2 эл. - после запятой переменная а.

READLN (х, у, f);

В этом примере в скобках список ввода (3 эл. ввода) через зпт.

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

В примере переменной а присваивается значение переменной Ь.

Условный оператор IF усл. then оператор

После IF - пробел Если за IF - скобка, то пробел НЕ ставиться, после условия пробел и ключевое слово then

IF a>b then x:=SQR(a+b)

Если условие истинно, то

Выполняется настоящий оператор, после then, если условие ложное, ничего не выполняется

Оператор вывода Это оператор состав. Условие выбора CASE ключ выбора OF

CASE k of 1: оператор 1 (если k=l то работает оператор 1) 2: begin оператор 2; end); 3: оператор 3; end);

Вопрос №14.

Общая структура программы на Паскале.

Program m; описание констант; описание типов; описание переменных;

Procedure PR1 (список формальных парамерюв), описание локальных переменных;

begin

описание процедуры;

END; Можно записывать несколько процедур (функций)

Function F1 (список формальных параметров):тип; (число тип переменных) описание локальных переменных;

begin

операторы функции

END;

Когда будет записана последняя процедура или функция, то будет закончена описательная часть программы;

begin (*начало программы*) операторы программы;

PR1 (список фактических параметров) обращение к процедуре F1 (список фактических параметров)

END.

Краткая форма усл. оператора

1) If усл. Then опер.

2) If усл. Then begin оператор end.

Если условие выполн., то работают операторы в операторных скобках (begin - оператор - еnd )

IF a>b then begin x:=SQR(a+b); write (x);

END.

Полная форма усл. оператора

IF услов опер 1 IF х>2 then begin y:=SQR(cos(x));

ELSE опер 2 ELSE writeln ('нет решений');

Если условие - истинно, то работает onep l, если ложь - опер 2.

Наиболее полная форма условного оператора IF услов then begin операторы 1

END ELSE begin Операторы 2

END:

IF x:=2 then begin y:=exp(x); writeln (y); END ELSE;

writeln ('при x не больше 2'); writeln ('нет решений'); END.

Оператор регулярного

цикла FOR J:=l to 10 do

1) FOR J:=l to a[I]:=random(100);

(обращение к генератору случайных чисел)

2) FOR n:=50 downto 4 do FOR n:=50 downto 4 do

Цикл с преду ел. WHILE условие DO

WHILE (до тех пор как)

условие перед оператором

Цикл с постусл. REPEAT UNTIL условие

Вопрос №15.

Подпрограммы

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