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

как то так

program prog1;varx, y, c: integer;S: real;beginreadln(x, y, c);S:=x+y/2c;writeln('Значение выражения x+y/2c равно', S);end.