Var
a, b, c, max: longint;
begin
readln(a, b, c);
max := a;
if (b > max) then
max := b;
if (c > max) then
max := c;
writeln(max);
end.
1) Сместиться на (−5, −2)
2) Сместиться на (−3, −5)
3) Сместиться на (−5, −4)
<span>4) Сместиться на (−5, −5)
(-5-3-5-5;-2-5-4-5)=(-18;-16)
значит, чтобы вернуться в исходную точку нужно выполнить команду :
сместиться на(18;16)</span>
121X=110
X=121/110
///////////////////////////////////////
5) a1:=1/x
a2=(1/x)/x=1/x^2
a3=(1/x^2)/x=1/x^3
a4=(1/x^3)/x=1/x^4
y=(1/x)+(1/x^2)=(x+1)/x^2
y=(x^2+x+1)/x^3
y=(x^3+x^2+x+1)/x^4
6) Ответ: 14
7) 5 суток = 5*24*60 = 5*24*60*60 сек
8) хз
9) Var a,b,c,s,x: integer;
begin
x:=125;
a:=x div 100;
b:=x mod 100 div 10;
c:=x mod 10;
s:=a+b+c;
writeln(a);
writeln(b);
writeln(c);
writeln(s);
<span> end.</span>