Составить программу вычисления значения функции y=3x-8

Question

Составить программу вычисления значения функции y=3x-8

Answer 1

Program1;
Var
y,x:real;
Writeln('vedi x');
readln(x);
y=3x-8;
writeln ('y=');
readln;
End.

Возможно это правильно