Самостоятельная работа по теме "Ветвления"

Самостоятельная работа

Что будет выведено на экран в результате выполнения программ, если задать

следующие данные Х – число (день вашего рождения) .

1) PROGRAM Z1;

VAR Х,Y: REAL;

BEGIN

WRITELN(‘Введите число ‘);

READLN(X);

IF X < 12 THEN Y= 10*X+5 ELSE Y= 100*X+6;

WRITELN(‘Y=’,Y:8:2);

END.

2) PROGRAM Z2;

VAR Х,Y: REAL;

BEGIN

WRITELN(‘Введите число ‘);

READLN(X);

IF X > 3 and X < 15 THEN Y= 5*X ELSE Y= 5*X+6;

WRITELN(‘Y=’,Y:8:2);

END.

3) PROGRAM Z3;

VAR Х,Y: REAL;

BEGIN

WRITELN(‘Введите число ‘);

READLN(X);

IF X < 1 or X > 22 THEN Y= 5*X ;

WRITELN(‘Y=’,Y:8:2);

END.

4) PROGRAM Z4;

VAR Х,Y: REAL;

BEGIN

WRITELN(‘Введите число ‘);

READLN(X);

IF X < 13 THEN Y= 5*X

     ELSE IF X <17 THEN Y= 5*X+6

     ELSE Y=10+X;

WRITELN(‘Y=’,Y:8:2);

END