На шоссе расположены пункты
K
и
R
, удалённые друг от друга на 51 км.
Мотоциклист выехал из пункта
R
в направлении, противоположном
K
, со скоростью 54 км/ч.
Составь математическую модель, описывающую положение мотоциклиста относительно пункта
K
через
t
часов.

ответ:
s=⋅t+,t≥

только вчера это

если п и ж аборигены, то она должны всегда говорить правду.значит ж(абориген)говорит правду, что он абориген и п передаёт правду. он абориген.

если п иж пришельцы, то они должны врать.значит ж говорит (неправду) я абориген, и п передаёт он пришелец. контексту.

если п-пришелец,а ж-абориген, то п должен врать, а ж говорить правду. значит жсказал правду " я абориген", а проводник передал он пришелец. несоответсвует контексту.

если п- абориген, а ж пришелец, то п всегда говорит правду, а ж неправду. значит  сказал" неправду "я абориген" а п передал он абориген.

в обоих случаях проводник абориген.

п- проводник

ж - житель

var s,a,i: real;

begin

  repeat

      writeln("вес следущего пасажира kg");

      read(a);

      s: =s+a;

      if s< 8000 then

          i: =i+1;

  until s> =8000

  writeln(i);

end.

var b,a,i: real;

begin

  read(a,b);

  repeat

      a: =a+a*0.03;

      i: =i+1;

  until a> =b

  writeln(i);

end.

var i,s: integer;

begin

  for i: = 1900 to 1999 do begin

        s: =s+365;

        if (i mod 400=0) or ((i mod 4 = 0) and (i mod 100< > 0)) then

            s: = s+1;

  end;

  writeln(s);

end.

var s,i,n,m : longint;

begin

  readln(m,n);

  if m> n then

  begin

      s: =m;

      m: =n;

      n: =s

  end;

  s: =0;

  for i: = m to n do if i mod 12=0 then s: =s+i;

  writeln(s);

end.

var n,i: byte; p,s,r: real;

begins: =0; p: =1; write('введите n = '); readln(n); for i: =1 to n do beginreadln(r); s: =s+r; p: =p*r; end; writeln('cумма всех чисел s = ',s: 0: 4); writeln('произведение всех чисел p = ',p: 0: 4); writeln('cреднее арифметическое = ',(s/n): 0: 4); end.