Скласти програму для обчислення значення виразу S=(a+b-c)/k де а б с цілі , к дійсне

ОТДЕЛ Задание+;
ИСПОЛЬЗУЕТ Вывод ИЗ "...\Отделы\Обмен\", Приём ИЗ "...\Отделы\Обмен\";

ПЕР
a, b, c: ЦЕЛ;
k, S: ВЕЩ;

УКАЗ
Вывод.Цепь("a = ");
a := Приём.Число();
Вывод.Цепь("^b = ");
  b := Приём.Число();
Вывод.Цепь("^c = ");
  c := Приём.Число();
Вывод.Цепь("^k = ");
  k := Приём.Число();
S := (a + b - c) / k;
Вывод.ЧВещ("^S = %g", S, 0, 0, 0)

КОН Задание.