не могу исправить ошибку на паскаль программа вот: var
v0,v,s,real:
begin
readen(v0)
readen(a)
readen(v)
s:=(sqr(v0)-sqr(v))/2*a
writhen(s)
end

Question

Информатика: не могу исправить ошибку на паскаль программа вот: var v0,v,s,real: begin readen(v0) readen(a) readen(v) s:=(sqr(v0)-sqr(v))/2*a writhen(s) end

Andylov · Answer

var

v0,v,s,a: real; //добавили переменную a

begin

readln(v0); //readen → readln

readln(a);

readln(v);

s:=(sqr(v0)-sqr(v))/2*a;

writeln(s); //writhen → writeln

end.