Срочно надо помогите пожалуйста!!! Решить задачу TURBO PASCAL a=(z+x)*3

Question

Срочно надо помогите пожалуйста!!!
Решить задачу TURBO PASCAL a=(z+x)*3

Answer 1

Var
   x,z,a:real;

begin
   Readln(x,z);
   a:=(z+x)*3;
   Writeln(a);
   Readln
end.