На шоссе расположены пункты K и R, удалённые друг от друга на 24 км. Мотоциклист выехал из пункта R в направлении, противоположном K, со скоростью 57 км/ч.
Составь математическую модель, описывающую положение мотоциклиста относительно пункта K через t часов.
ответ: s= ...*t+...,t больше ...

Сноски отображаются в нижней части страницы, а концевая сноска в конце документа. На вкладке "Ссылки" выберите "Вставить сноску" или "Вставить концевую сноску". ... Введите нужные в сноски или концевую сноску.  (С)bЧтобы удалить сноску, установите курсор в тексте, по правую сторону от её индекса (цифры или литеры). 2. Нажмите 2 раза клавишу «Backspace» (длинная стрелочка влево, расположена над клавишей «Enter»).Для вставки концевой сноски нажмите клавиши CTRL+ALT+D. (D)Для вставки обычной сноски нажмите клавиши CTRL+ALT+FПервая версия была написана Ричардом Броди (Richard Brodie) для IBM PC, использующих DOS, в 1983 году. (А)

Пример, ненужное уберешь

const
    handsfree = true;

var
    a: array[1..100, 1..100] of real;
    max, min: real;
    sum, product: real;
    i, j, m, n, k: integer;

begin
    {ввод матрицы}
    if handsfree then begin
        n := random(20) + 2;
        m := random(20) + 2;
    end
    else begin
        write('n, m =');
        readln(n, m);
    end;
    
    writeln('Данные матрицы:');
    for i := 1 to m do
    begin
        for j := 1 to n do
            if handsfree then begin
                a[i, j] := random(100) - 50;
                write(a[i, j]:4, ' ')
            end
            else
                read(a[i, j]);
        writeln;
    end;
    
    {минимумы и максимумы}
    max := a[1, 1];
    min := a[1, 1];
    for i := 1 to m do
        for j := 1 to n do
        begin
            if max < a[i, j] then max := a[i, j];
            if min > a[i, j] then min := a[i, j];
        end;
    writeln('max = ', max);
    writeln('min = ', min);
    
    {сумма, произведение, пр. агригаты}
    sum := 0;
    product := 1;
    for i := 1 to m do
        for j := 1 to n do
            if a[i, j] <> 0 then {если нужен фильтр}
            begin
                sum := sum + a[i, j];
                product := product * a[i, j];
                k := k + 1;
            end;
    writeln('sum = ', sum);
    writeln('product = ', product);
    writeln('average = ', sum / (n * m));
    writeln('average (selected) = ', sum / k);
end.