Даны целые числа x, y,c. напишите программу, которая находит значение выражения x+y/2c и выводит на экран монитора результат.

Var a,b,c:integer; 
Summ:real;
begin
Writeln('Введите три целых числа через пробел (a b c)');
readln(a,b,c);
summ:=a+b/(2*c);
writeln(summ);
end.