Var skorost,pyt:real;
begin
writeln('Скорость равна = ');
read(skorost);
writeln('Путь равен = ');
read(pyt);
writeln('Время равно = ',pyt/skorost);
end.
Нужно только загрузить в Фотошоп и сделать векторизацию!
Прямоугольна система состоит из 3 осей(x,y,z).
Var
y, x: real;
begin
readln(x);
if (x < 0) then
y := sin(x) / cos(x)
else
if (x <= 1) then
y := exp(2)
else
y := x + cos(x);
writeln(y);
end.
Моделирование это процесс создания модели, а модель это результат модеоирования