Cоставить программу вычисления y=4x/12b+10 (паскаль)
Var x,b: integer; y: real; begin readln(x,b); y:=4*x/12*b+10; write (y); end.
Вопрос не по теме, вы увлекаетесь рисованием?
Нет.