определите программу ввода значений A,B,C в одной строке и выведите результаты выражения A*(B/3.14)+(с*2) в отдельной строке

program al;var a, b, c:integer;rezult:real;beginwrite(' a = ');read( a );write('b=');read(b);write('c=');read(c);rezult:= a*(b/3.14)+c*2;writeln('rezultat=', rezult);readln;end.