Пройденный путь = |S-(T*(u1+u2))|
На паскале
var u1,u2,S,T,P:integer;
begin
Readln(u1,u2,S,T);
P:=Abs(S-((u1+u2)*T));
Writeln('Растояние между ними через T часов = ',P);
end.
25^7+5^18-25=
=5^14+5^18-5^2=
=5^18+5^14-5^2
5^18 = 1 0000...0 - (одна 1 и 18-ть нулей) в 5сс
5^14 =1000...0 - (одна 1 и 14-ть нулей) в 5сс
5^2 =100 в 5сс ( одна 1 и два 0)
5^14-5^2 (10cc) = 100 000 000 000 000 - 100 (5cc) =
=44 444 444 444 400 (5cc) - 12-ть четвёрок
ответ 12
Т.е 3f в 10-ую, 8-ую
3f(в 16)=111111(в 2)= 77 (в 8) = 63 (в 10)
Как вариант. "Или" - разные преподаватели требуют по-разному. Как вариант еще сначала проверить А=В, если нет, то тр. не равн., если да, то проверять А=С, если нет, то тр. не равн., если да(и А=В, и А=С), то тр. равносторонний.
var a,b: array of integer;
i,n,lo,ss: integer;
begin
lo:=0;
ss:=1;
write('Введите количество элементов массива');
readln(n);
setlength(a,n);
setlength(b,n);
for i:=0 to n-1 do
begin
write('Ввод данных для a[',i+1,']=');
readln(a[i]);
if a[i]<0 then inc(lo) else ss:=ss*a[i];
end;
writeln('Данные массива A:');
for i:=0 to n-1 do writeln('a[',i+1,'] = ',a[i]);
writeln;
writeln('Данные массива B:');
for i:=0 to n-1 do
begin
if odd(i+1) then b[i]:=lo else b[i]:=ss;
writeln('b[',i+1,'] = ',b[i]);
end;
end.