Оператори введення та виведення даних

Для написання найпростіших програм потрібно знати оператори введення та виведення даних. Оператор введення поміщає значення змінної, яка вводиться, у відповідну ділянку пам’яті. Він має такий вигляд:

Read (<список імен змінних>); або Readln (<список імен змінних>);

При виконанні оператора Read програма зупиняється і чекає поки користувач введе з клавіатури значення і натисне клавішу пробіл чи клавішу Enter. Дія оператора Readln аналогічна, за виключенням того, що курсор на екрані дисплея після виконання оператора переходить на новий рядок.

Для виведення результатів роботи програми на екран дисплея використовується оператор:

Write (<список виведення>); або Writeln (<список виведення>);

Список виведення складається із імен змінних та виразів. Наприклад,

Write (‘Значення суми ’,S);

Writeln (‘а = ’,a, ’ b = ’,b);

Оператор Writeln відрізняється від Write лише тим, що після виведення даних переводить курсор на екрані дисплея на новий рядок. Допускаються також порожні оператори Readln та Writeln. Рядок Readln; в програмі чекатиме натиснення клавіші Enter, але введені з клавіатури значення не будуть нікуди заноситись. Порожній оператор Writeln; лише переводитиме курсор на новий рядок.

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

Для надання змінній нового значення використовується оператор присвоєння. Загальний вигляд оператора присвоєння такий:

<Ім’я змінної>:=<вираз>;

Знак “:=” означає “присвоїти”, надати змінній значення. При виконанні оператора присвоєння спочатку обчислюється значення виразу, записаного зліва від оператора присвоєння, і одержане значення записується у змінну, що вказана зправа від знака присвоєння. Наприклад,

Y:=Sin(x)+Cos(x);{змінній Y присвоїти значення Sin(x)+Cos(x)}

i:=i+1;{збільшити значення змінної i на одиницю}

d:=b*b-4*a*c;{змінній d надати значення виразу b*b-4*a*c }

У мові Pascal існує жорсткий контроль типів. Тому тип виразу, що знаходиться зправа від оператора присвоєння повинен відповідати типу змінної, що записана зліва від знака присвоєння.

Приклади програм:

Приклад 1: Написати програму для обчислення площі круга та довжини кола за відомим радіусом.

Program pr1;

Const

Pi=3.141592;

Var

R, L, S: Real;

Begin

Writeln (’Введіть радіус’);

Readln(R);

L:=2*Pi*R; S:=Pi*R*R;

Writeln(’Довжина кола = ’,L);

Writeln(’Площа круга = ’,S);

End.

Приклад 2: Знайти середнє арифметичне трьох цілих чисел і вивести його на екран дисплея.

Program pr2;

Var

a, b, c: Integer;

s: Real;

Begin

Writeln (’Введіть три цілих числа’);

Readln(a, b, c);

s:=(a+b+c)/3;

Writeln(’Середнє арифметичне = ’,s);

End.

Для виконання завдань контрольної роботи потрібно знати як стандартні математичні функції записуються мовою Pascal. Приведемо наступну таблицю:

Математичний запис	Запис мовою Pascal	Математичний запис	Запис мовою Pascal
	Sin(x)		Sqr(x)
	Cos(x)		Exp(x)
	Arctan(x)		Ln(x)
	Sqrt(x)		Abs(x)