1.var a:integer;beginwrite('Введите число: ');readln(a);if a>0 then a:=a-10 else a:=a+10;writeln('a = ',a);end.Пример:Введите число: 5a = -52.var a,b,p:integer;beginwriteln('Введите два числа: ');readln(a,b);if a*b<0 then p:=-2*a*b else p:=3*a*b;writeln('p = ',p);end.Пример:Введите два числа: -3 -8p = 723.var a,b,r:integer;beginwriteln('Введите два числа: ');readln(a,b);if a>b then r:=a-b else r:=b-a;writeln('r = ',r);end.Пример:Введите два числа: 25 48r = 234.var r:integer;beginwriteln('Введите рост: ');readln(r);if r>180 then writeln('высокий') else if r=180 then writeln('нормальный') else writeln('низкий');end.Пример:Введите рост: 160низкий