Наберите программу, отладьте ее работу и проверьте на различных данных.
program n_1;
var v0, s: real;
begin
writeln ('Вычисление длины пути торможения
автомобиля');
write ('Введите начальную скорость (м/с)> ');
readln (v0);
s:=v0*v0/10;
writeln ('До полной остановки автомобиль
пройдет', s:8:4,' м.')
end.

Йфячы    2   15.11.2020 22:28    43