Наберите по очереди следующие программы

1) Program z;

var a,b : integer;

begin

a :=7 ;

writeln (a);

b := a + 2;

writeln (b);

end.

2) Program z;

var a : integer; b: string;

begin

writeln (‘введите ваше имя’);

readln (b);

writeln (‘сколько вам лет?’);

readln (a);

writeln (b);

writeln (a);

end.

3) В фигурных скобках можно писать пояснение. Это необязательный элемент программы.

Program l; {заголовок программы}

Var a,b,c: integer; {целые числа}

BEGIN {начало раздела операторов}

c:=5;

b:=4;

a:=c*b;

writeln(a); {вынесение на экран значения a}

END.

Введите другие числа и снова запустите программу.