Составить программу для паскаля для нахождения y:

y=2x-12

если x меньше 5,

для всех остальных значений x y=7-8x

begin

read(x);

if (x<5)

writeln(2*x-12)

else

writeln(7-8*x);