Презентація на тему:
Мова програмування Pascal

Процедури введення та виведення символів. Умова. Оператор розгалуження.

READ(); READLN (); READLN; - затримка на екрані до натискання READ (a,b,c); READLN (a,b,c); Enter

Приклад VAR a:shortint; b:real; c:char; BEGIN READLN (c,a,b); ..._____________________________ 210 4 2.3 Enter

WRITE(); WRITELN (); WRITE (a,b,c); //*виведення в рядок WRITELN (a,b,c); WRITELN (a,’ ‘,b,’ ‘,c); WRITELN (’Введіть радіус кола’); WRITELN (27+28*29);

Приклад WRITE(‘Привіт, ’); WRITE(‘світ!’); Приклад WRITELN(‘Привіт, ’); WRITELN(‘світ!’); Результат Привіт, світ!_ Результат Привіт, світ! _

A:=-13; B:=13.25; WRITELN(A,B); -13 1.32500000000000E+01 – дійсне число з плаваючою крапкою

: [:] поля після крапки виведення WRITELN(A:4,B:8:2); _-13___13.25

- вираз логічного типу, набуває значень TRUE або FALSE. Проста умова: 1) порівняння X>0 2) значення логічного типу var X: BOOLEAN; Складені умови: формуються з простих умов за допомогою логічних операцій AND, OR, XOR. (X>0) AND (Y>0)

Операція Пріоритет Вид операції Not, унарні -, + Перший (вищий) Унарна операція *, /, div, mod, and Другий Операції типу множення +, -, or, xor Третій Операції типу додавання =, , , = Четвертий (нижчий) Операції відношення

-команда умовного переходу Оператор 1 Оператор 2 умова

IF THEN else ; //*повна форма IF THEN ; //*скорочена форма

X>0 NOT (X0 THEN Y:=1 ELSE Y:=-1; If X0 THEN Y:=1; Y:=-1;

Ввести з клавіатури 2 числа та знайти максимальне. Вивести максимальне число на екран. - Вивод на дісплей

MAX:=A MAX:=B Ввести A,B (з клавіатури) A>B A, B – цілі знакові Кінець Вивести MAX (на екран)

Ввести з клавіатури 2 числа та знайти максимальне Var A,B, max: longint; BEGIN WRITELN (‘Vvedite 2 chisla’); READLN (A, B); If A>B THEN max:=A ELSE max:=B; WRITELN (max); READLN; END

X, Y, R, D – дійсні числа X, Y, R R:=R2 D:=X2+Y2 D < R END F T F T Всередині кола D > R На колі Зовні