Оператори вводу даних з клавіатури Read, Readln

Read (список вводу)

Readln (список вводу)

Список вводу – список тільки змінних (вказуються через кому).

Значення змінним можна присвоювати не тільки оператором присвоєння, а й за допомогою операторів вводу. Використовуючи їх, можна не вказувати дані у програмі, а вводити їх окремо.

Операторами Read (список вводу) або Readln (список вводу)  можна вводити числа двома способами: через пробіл та через Enter. При цьому перше число присвоюється першій змінній зі списку, друге число - другій і т.д.

Приклад

Дано ширина та довжина прямокутника. Знайти його площу (s=a*b).

Програма	Ввід	Вивід
Program P2;  Var a,b,s:word; Begin   Read(a,b);   s:=a*b;   Writeln(‘Площа = ',s,' кв. см.');   readln end.	5 8	40
	5 8	40

Пояснення. У тексті програми ніяких значень ширини та довжини немає. Вони будуть вводитись із клавіатури після того, як програма почне працювати. Значення 5присвоюється змінній a, значення 8 змінній b. У першому випадку значення вводяться через Enter, у другому - через пробіл.

Оператор Readln без списку використовується, щоб побачити результат роботи програми (замість Alt+F5). Натиснувши Enter, ми повертаємось у програму.

Приклади роботи програм

Різницю між операторами Read та Readln видно тільки, якщо у програмі використовується декілька операторів вводу.

Наприклад, для операторів Read числа можна вводити по-різному, відповідь буде однакова.

Програма	Варіанти вводу	Екран
Program P2;   Var a,b,s:word; Begin   Read(a); Read(b);   s:=a*b;   Writeln(‘Площа = ',s,' кв. см.');   readln end.	5 8	40
	5 8	40

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

Програма	Варіанти вводу	Екран
Program P2; Var a,b,s:word; Begin Readln(a); Readln(b); s:=a*b; Writeln(‘Площа =',s,' кв.см.'); readln end.	5 8	40
	5 8	Змінній а присвоєне значення 5 та програма чекає вводу другого числа

Приклад

Дано ширина та довжина прямокутника. Знайти його площу (s=a*b).

Var a,b,s:word; Begin   Read(a,b);   s:=a*b; Writeln(‘Площа = ',s,' кв. см.'); end.

Блок-схема програми

Кожен блок відповідає певному оператору. Блоки виконуються в напряму ліній.

Варіанти задач

Поверніться на попередню сторінку та складіть програму з пункту 7 (свій варіант), вводячи вхідні дані за допомогою оператору Read.