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

nadialihas2005 nadialihas2005    3   06.12.2020 09:59    1

Ответы
Tenur Tenur  06.12.2020 10:00

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.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика