Y=2(3xp+1) x=10 паскаль

Question

Y=2(3xp+1) x=10 паскаль

Answer 1

Var y,x,p: Integer;
begin
writeln('Введите p');
readln(p);
x:=10;
y:=2*(3*x*p);
writeln('y=',y);
end.