Нарисовать блок-схему и написать программу для нахождения значения выражения y=4a+12b, при а=10.
Var y,a,b:real; begin writeln('Введите значение B: '); readln(b); a:=10; y:=4*a+12*b; writeln('Ответ: ',y); end.