Найдите ошибки в программе(паскаль) Program zadacha Var v1, t1, v2, t2, v: real; begin ; Writeln (‘введите значения v1, t1, v2,t2’); Readln (v1, t1, v2, t2); t = (v1*t1+v2*t2)/(v1+v2); Writeln (T смеси = , t); end

Найдите ошибки в программе(паскаль) Program zadacha Var v1, t1, v2, t2, v: real; begin ; Writeln (‘введите значения v1, t1, v2,t2’); Readln (v1, t1, v2, t2); t = (v1*t1+v2*t2)/(v1+v2); Writeln (T смеси = , t); end
Гость
Ответ(ы) на вопрос:
Гость
Program zadacha;  Var t, v1, t1, v2, t2, v: real; begin ; Writeln ('введите значения v1, t1, v2, t2'); Readln (v1, t1, v2, t2);  t := (v1*t1+v2*t2)/(v1+v2);  Writeln ('T смеси = ', t);  end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы