Составить программу на Turbo Pascal: вычислить выражение [(2а+4Ь)+1]/(а+2Ь+4).

Question

Составить программу на Turbo Pascal: вычислить выражение [(2а+4Ь)+1]/(а+2Ь+4).

Answer 1

Uses Crt;
var
  a,b:real;
begin
  ClrScr;
  Write('a,b='); Read(a,b);
  Writeln((2*a+4*b+1)/(a+2*b+4));
  ReadKey
end.

Тестовое решение:
a,b=3.75 -2.184
-6.9781194561E-02