Скласти програму Pascal для задачі: Змішали V1 літрів води температури t1 та V2 літрів води температури t2. Знайти об'єм та температуру утвореної суміші.
Answers & Comments
vladmor
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.
Answers & Comments
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.