Найдите ошибки в программе(паскаль) 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

Bigdaddypro100 Bigdaddypro100    3   25.06.2019 06:00    0

Ответы
Lizok2509 Lizok2509  02.10.2020 10:46
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.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика