Команди виведення даних (write, writeln).

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

write(<вираз 1> ... < вираз n>);

В списку виводу можуть бути константи, змінні або вирази.

Дія команди. Константи, значення змінних і виразів виводять на екран у вікно виводу.

Команда writeln(<вираз 1> ... < вираз n>); діє майже так само, як і команда write. Відмінність в тому, що наступна після неї команда виведення друкуватиме значення в новому рядку.

Для переходу на новий рядок екрану або для пропуску рядка використовують команду writeln без параметрів.

Якщо написати такі команди виведення:

write('p = ', р);

writeln('s = ', s);

то для вхідних даних а = 5, b = 3.6, с = 4.2, на екрані отримаємо такий результат: р = 1.2800000000E+01 s = 7.429239530Е+00.

Форматоване виведення даних.

Форматування - це представлення результатів в потрібному для користувача вигляді. Для цього після виразу записують формат - двокрапка і число (:n), позначаючи кількість позицій на екрані, які необхідно виділити для виводу значення цього виразу.

Формат :n застосовують для даних цілого і рядкового типів.

При виведенні даного дійсного типу указують загальну кількість позицій (n) і кількість позицій для дробової частини (m), тобто формат виглядає так :n:m.

Розглянемо команду виведення writeln(‘p=’, р:5:2) Вона забезпечує виведення на екран (з метою пояснення результату роботи програми) рядкової константи 'р =' без лапок і числа 12,8 у форматі :5;2, тобто так: р = 12.80.

Якщо не використовувати форматоване виведення, то для даних цілого і логічного типів на екрані виділяється до 15 позицій, для даних дійсного типу - 18. Дані дійсного типу виводяться у вигляді

Х.ХхххххххххЕзнакхх

де х - будь-яка цифра, що часто є надмірним. Такі числа на екрані можуть зливатися.

Задача 1:

Написати програму знаходження цифр трьохзначного числа

.program examp1_1;

var

a, z1,z2,z3, rez : integer;

begin

writeln('Введіть число’); readln(a);

z1:=a Mod 10;

writeln('Цифра одиниць числа - ’z1);

z2:=(a Div 10) Mod 10;

writeln('Цифра десятків числа - ’z2);

z3:=a Div 100;

writeln('Цифра сотен числа - ’z3);

rez:=z3*100+z2*10+z1;

writeln(Це теж саме число - ’rez);

end.

Питання для самоконтролю.

1. Дія команди присвоювання.

2. Основні операції, та їх пріоритет.

3. Правила запису арифметичних виразів

4. Правила запису стандартних функцій

5. Результатом операції trunc(2.1) буде?

6. Результатом операції frac(2.1) буде?

7. Результатом операції round(2.1) буде?

8. Результатом операції int(2.1) буде?

9. Якщо x:=l; inc(x,5); то х= ?

10. Якщо x:=7; dec(x,3); то x=?

11. Якщо x:=l; inc(x,5); то х= ?

12. Якщо x:='d'; dec(x); то х= ?

13. Якщо результат об’явлений як цілочисленний, чи можна використовувати наклонну черту ділення?

14. Чи можна використовувати операцію div для дійсних чисел?

15. Операція mod використовується тільки по відношенню до яких чисел?

16. Які команди введення даних ви знаєте?

17. В чому полягає відмінність між командами read і readln?

18. Чи можна вводити з клавіатури значення змінних логічного і переліченого типів?

19. Які команди виведення даних ви знаєте?

20. В чому полягає відмінність команд виведення даних (write, writeln).

21. Форматоване виведення даних.

22. Формат :n застосовують для…?

23. Формат для виведення яких чисел виглядає так :n:m?