Написать программу вычисления значения функции y=a^2+2b^2-4ab для 12 точек

всего длина окружности составляет 2пr, а половина - пr

рассмотрите внимательно схему с.15 № 34

var v1,v2,t,t1: real;

begin

  read(v1,v2,t,t1);

  writeln(v1*(t+t1)< =v2*t1);

end.

строку наоборот?

var s: string;

i: integer;

begin

  read(s);

  for i: = length(s) downto 1 do

        s1: = s1+s[i];

  writeln(s1);

end.