Скласти програму pascal для і: змішали v1 літрів води температури t1 та v2 літрів води температури t2. знайти об'єм та температуру утвореної суміші.

Var v1,t1,v2,t2:real;
begin
  writeln('input V1,t1');
  readln(v1,t1);
  writeln('input V2,t2');
  readln(v2,t2);
  writeln('V = ',v1+v2,' T = ',(T1*V1+T2*V2)/(V1+V2)) ;
end.