Экономика және басқару институтының

Дәріс мазмұұны

В операторах вывода write и writeln имеется возможность установить ширину поля вывода.

Если x и i - целочисленные выражения, а y - вещественное выражение, то вызов

write(x : i, y : i)

печатает значения x и y каждое в крайние правые позиции полей шириной i;

write(y : i : x)

вызовом в крайние правые позиции поля шириной i символов выводится десятичное представление значения y в формате с фиксированной точкой, причем после десятичной точки выводится x цифр, представляющих дробную часть числа.

Для того чтобы задать последовательное выполнение (по порядку, один за другим) нескольких операторов, в языке Pascal существует составной оператор. Операторы, входящие в составной, разделяются символом ";", в начале ставится служебное слово begin, в конце – end.

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

Обратите внимание: перед служебным словом end разделитель (символ ";") не ставится.


Дәріс 16 -17

Тақырыбы: CRT кітапханасы Шамалар арасындағы шарт ретіндегі қатынастар

Мақсаты : CRT кітапханасы , процедуралар Шамалар арасындағы шарт ретіндегі қатынастар

..Дәріс мазмұны

Очень часто так же, как и в жизни, при решении задач некоторые действия выполняются в зависимости от истинности каких-либо условий. Например, мы берем с собой зонт, если идет дождь или на небе тучи. Или часто встречающиеся в математике определения функций:

если x<0, то f(x)=x+1;

если x>=0, то f(x)=2x.

Здесь значение функции f вычисляется в зависимости от величины x по разным формулам.

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

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

Если значение логического выражения – true, то выполняется оператор1, если false, то выполняется оператор2.

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

Для примера полной формы рассмотрим определение функции f(x):

else f:=2*x;

If B then f:=x+1

else f:=2*x;
Пример краткой формы:

if not((x<3) and (x>1)) then y:=sqr(x);

В данном случае необходимо помнить, что служебное слово else всегда ассоциируется с ближайшим по тексту программы словом if, которое еще не связано с else. А чтобы такая двусмысленность не возникала, лучше всего пользоваться составным оператором:

begin

if <условие2> then <оператор1>

else <оператор2>

case x of

1..2 : f:=5;

3, 4, 10..20 : f:=10;

5, 6 : f:=15;

else writeln(‘Введен неправильный параметр!’)

end
Дәріс 18

Тақырыбы:. Турбо Паскальдағы тармақталу командасы .

Мақсаты: Турбо Паскальдағы тармақталу командасына мысалдар
Дәріс мазмұны:

Операторы циклов

Очень часто возникает необходимость выполнить один и тот же оператор (или группу операторов) несколько раз. Для этого в языке Pascal предусмотрены операторы циклов.

Блок схема такого оператора:

Форма записи:

В качестве оператора может быть любой простой или составной оператор. Оператор здесь выполняется только в том случае и до тех пор, пока истинно условие, которое проверяется каждый раз после выполнения оператора. Если с самого начала условие имеет значение false, оператор цикла не выполнится ни разу.

Примеры:

Вычисление факториала:

while x <=N do

begin {начало цикла}

Fact := Fact*x;

x := x + 1

end; {конец цикла}

Вычислить у=х² при х=2, 4, 6, 8, 10:

x:=2;

while x<=10 do

y:=sqr(x);

writeln(‘x=‘,x:3, ‘y=‘,y:5);

x:=x+2

t:=true;

Форма записи:

repeat

<оператор₁>;

<оператор₂>;

…

until <условие>;

Примеры:

x:=2;

y:=sqr(x);

writeln(x:3,y:5);

x:=x+2

Вводить символы с клавиатуры до тех пор, пока не будет введен символ "!"

Repeat {начало цикла}

writeln(‘введите символ’);

readln(c)

until c=‘!’; {конец цикла}