Speed, Distance & Time in Motion (RACE CAR)
Loading the math board and drawing, please wait…
In collections
Primary School Mathematics Collection
This example demonstrates the concept of speed, distance, and time through a simulation of multiple cars. It involves mathematical concepts such as velocity, displacement, and cumulative distance. The construction uses GeoGebra commands like Simplify, If, Min, Max, Textfield, Segment, and Polygon to visualize car positions, displacements, and total distances. Suitable for middle or high school students learning kinematics and geometric construction.
GeoGebra Commands & Parameters
Simplify(YellowPositionInput) → YellowPositionSimplify(Integral[abs(Derivative[YellowPosition])]) → YellowTotalDistanceFromZeroSimplify(RedPositionInput) → RedPositionSimplify(Integral[abs(Derivative[RedPosition])]) → RedTotalDistanceFromZeroSimplify(GreenPositionInput) → GreenPositionSimplify(Integral[abs(Derivative[GreenPosition])]) → GreenTotalDistanceFromZeroSimplify(YellowPosition(x) - YellowPosition(x_1)) → YellowDisplaceSimplify(YellowTotalDistanceFromZero(x) - YellowTotalDistanceFromZero(x_1)) → YellowTotalDistanceIf(ShowPosition ≟ true, YellowPosition, If[ShowDisplacement ≟ true, YellowDisplace, If[ShowTotalDistance ≟ true, YellowTotalDistance, 0]]) → YellowCarSimplify(RedPosition(x) - RedPosition(x_1)) → RedDisplaceSimplify(RedTotalDistanceFromZero(x) - RedTotalDistanceFromZero(x_1)) → RedTotalDistanceIf(ShowPosition ≟ true, RedPosition, If[ShowDisplacement ≟ true, RedDisplace, If[ShowTotalDistance ≟ true, RedTotalDistance, 0]]) → RedCarSimplify(GreenPosition(x) - GreenPosition(x_1)) → GreenDisplaceSimplify(GreenTotalDistanceFromZero(x) - GreenTotalDistanceFromZero(x_1)) → GreenTotalDistanceIf(ShowPosition ≟ true, GreenPosition, If[ShowDisplacement ≟ true, GreenDisplace, If[ShowTotalDistance ≟ true, GreenTotalDistance, 0]]) → GreenCarSimplify(BluePositionInput) → BluePositionSimplify(BluePosition(x) - BluePosition(x_1)) → BlueDisplaceSimplify(Integral[abs(Derivative[BluePosition])]) → BlueTotalDistanceFromZeroSimplify(BlueTotalDistanceFromZero(x) - BlueTotalDistanceFromZero(x_1)) → BlueTotalDistanceIf(ShowPosition ≟ true, BluePosition, If[ShowDisplacement ≟ true, BlueDisplace, If[ShowTotalDistance ≟ true, BlueTotalDistance, 0]]) → BlueCarMin(BlueCar, x_1, x_2) → BlueMinPointMax(BlueCar, x_1, x_2) → BlueMaxPointMin(GreenCar, x_1, x_2) → GreenMinPointMax(GreenCar, x_1, x_2) → GreenMaxPointMin(RedCar, x_1, x_2) → RedMinPointMax(RedCar, x_1, x_2) → RedMaxPointMin(YellowCar, x_1, x_2) → YellowMinPointIf(NumberOfCars ≟ 1, Min[{y(RedMinPoint)}], If[NumberOfCars ≟ 2, Min[{y(RedMinPoint), y(BlueMinPoint)}], If[NumberOfCars ≟ 3, Min[{y(RedMinPoint), y(BlueMinPoint), y(GreenMinPoint)}], If[NumberOfCars ≟ 4, Min[{y(RedMinPoint), y(BlueMinPoint), y(GreenMinPoint), y(YellowMinPoint)}]]]]) → MinFunctionValueMax(YellowCar, x_1, x_2) → YellowMaxPointIf(NumberOfCars ≟ 1, Max[{y(RedMaxPoint)}], If[NumberOfCars ≟ 2, Max[{y(RedMaxPoint), y(BlueMaxPoint)}], If[NumberOfCars ≟ 3, Max[{y(RedMaxPoint), y(BlueMaxPoint), y(GreenMaxPoint)}], If[NumberOfCars ≟ 4, Max[{y(RedMaxPoint), y(BlueMaxPoint), y(GreenMaxPoint), y(YellowMaxPoint)}]]]]) → MaxFunctionValueIf(NumberOfCars ≟ 1, Max[{RedCar(x_2)}], If[NumberOfCars ≟ 2, Max[{RedCar(x_2), BlueCar(x_2)}], If[NumberOfCars ≟ 3, Max[{RedCar(x_2), BlueCar(x_2), GreenCar(x_2)}], If[NumberOfCars ≟ 4, Max[{RedCar(x_2), BlueCar(x_2), GreenCar(x_2), YellowCar(x_2)}]]]]) → MaxEndValueIf(MaxFunctionValue ≥ MaxEndValue + FinishBlockWidth + (1 / 10 * CarLength), 0, FinishBlockWidth + (1 / 10 * CarLength)) → RightScreenCushionTextfield(x_1) → inputBox2Textfield(x_2) → inputBox3Segment(TLT, TRT) → TrackTopLineSegment(BLT, BRT) → TrackBottomLinePolygon(BLT, BLSB, TLSB, TLT) → StartingBlockOutline, blt_2, blsb_1, tlsb_1, tlt_1Polygon(BRFB, BRT, TRT, TRFB) → FinishBlockOutLine, brfb, brt_1, trt_1, trfbTextfield(NumberOfCarsTemp) → inputBox1If(NumberOfCars > 3, true, false) → ShowYellowCarIf(NumberOfCars > 2, true, false) → ShowGreenCarIf(NumberOfCars > 1, true, false) → ShowBlueCarIf(NumberOfCars > 0, true, false) → ShowRedCarTextfield(RedPositionInput) → RedInputBoxTextfield(BluePositionInput) → BlueInputBoxTextfield(GreenPositionInput) → GreenInputBoxSegment(LOL, LOR) → LaneOneSegment(LTL, LTR) → LaneTwoSegment(LThL, LThR) → LaneThreeTextfield(YellowPositionInput) → inputBox7If(NumberOfCars ≟ 1, {RedCar}, If[NumberOfCars ≟ 2, {RedCar, BlueCar}, If[NumberOfCars ≟ 3, {RedCar, BlueCar, GreenCar}, If[NumberOfCars ≟ 4, {RedCar, BlueCar, GreenCar, YellowCar}]]]) → ListOfCarsIf(NumberOfCars ≟ 1, Min[{RedCar(x_1)}], If[NumberOfCars ≟ 2, Min[{RedCar(x_1), BlueCar(x_1)}], If[NumberOfCars ≟ 3, Min[{RedCar(x_1), BlueCar(x_1), GreenCar(x_1)}], If[NumberOfCars ≟ 4, Min[{RedCar(x_1), BlueCar(x_1), GreenCar(x_1), YellowCar(x_1)}]]]]) → MinStartValue
AI Drawing Prompt Reference
Draw a race track with two parallel lines, the top line is TrackTopLine and the bottom line is TrackBottomLine. At both ends of the track, there are starting and finishing markers, with StartingBlockOutline for the start and FinishBlockOutLine for the finish. In the middle of the track, there are four lanes represented by LaneOne, LaneTwo, LaneThree, and LaneFour, each with a car: RedCar, BlueCar, GreenCar, and YellowCar. Users can input the position of each car in the text fields to show position, displacement, or total distance.
The prompt above was compiled from the original drawing commands and is for reference only.