Программа на языке паскаль a=30b/4+c v=b/a это всё одна программа​

Так?

var c, b:integer; a, v:real;

begin

read(b,c);

a:=30*b/4+c ;

v:=b/a;

writeln(v);

end.