Найдите ошибки в программе (паскаль)

Program zadacha

Var

v1, t1, v2, t2, v: real;

begin;

Writeln ('введите значения v1, t1, v2, t2') ;

Readln (v1, t1, v2, t2) ;

t = (v1t1+v2t2) / (v1+v2) ;

Writeln (T смеси =, t) ;

end

Question

Информатика

Димуля

23 ноября, 13:40

Найдите ошибки в программе (паскаль)

Program zadacha

Var

v1, t1, v2, t2, v: real;

begin;

Writeln ('введите значения v1, t1, v2, t2') ;

Readln (v1, t1, v2, t2) ;

t = (v1t1+v2t2) / (v1+v2) ;

Writeln (T смеси =, t) ;

end

+5

Ответы (1)

Знаете ответ на вопрос?

Валенсия · Answer 1

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.

Найдите ошибки в программе (паскаль)Program zadachaVarv1, 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 = (v1t1+v2t2) / (v1+v2) ;

Writeln (T смеси =, t) ;

end