Программа на языке паскаль 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.