четвер, 11 січня 2018 р.

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

Оператори вводу даних з клавіатури 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 840
ПоясненняУ тексті програми ніяких значень ширини та довжини немає. Вони будуть вводитись із клавіатури після того, як програма почне працювати. Значення 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 840
Для операторів 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.

Немає коментарів:

Дописати коментар