Без шага!
uses crt;
var
y,x,b: real;
begin
clrscr;
read (x,b);
y:=4*x/(12*b)+10;
writeln (y=,y);
readln ();
end.
Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.