var
  a: array [1..3, 1..2] of double;
  i: integer;
begin
  for i := 1 to 3 do
  begin
    writeln('V', i, ' = '); readln(a[i, 1]);
    writeln('t', i, ' = '); readln(a[i, 2]);
  end;
  writeln('V = ', a[1, 1] + a[2, 1] + a[3, 1], '  t = ', (a[1, 1] * a[1, 2] + a[2, 1] * a[2, 2] + a[3, 1] * a[3, 2]) / (a[1, 1] + a[2, 1] + a[3, 1]));
end.
  