Помогите плиз!
Напишите программу для вычисления значения выражения (a+b)/(a-b) для различных целых значений переменных.
Переменные вводить с клавиатуры оператором ввода информации READLN
Результат выведите в виде
ЗНАЧЕНИЕ ВЫРАЖЕНИЯ XX.XXX
c тремя знаками после запятой.
Напишите программу для вычисления значения выражения (a+b)/(a-b) для различных целых значений переменных.
Переменные вводить с клавиатуры оператором ввода информации READLN
Результат выведите в виде
ЗНАЧЕНИЕ ВЫРАЖЕНИЯ XX.XXX
c тремя знаками после запятой.
Answers & Comments
var
a, b: integer;
res: real;
begin
write('Число a:');
readln(a);
write('Число b:');
readln(b);
res :=(a+b)/(a-b);
writeln('Результат:', res:2:3);
end.