Не очень хорошо сформулирован вопрос.Эта программа генерирует 3 числа от -9 до 9 и выводит сначала все числа,затем наибольшее и наименьшее.
var a,b,c : Integer;
begin
Randomize;
a:=random(19)-9;
b:=random(19)-9;
c:=random(19)-9;
Writeln(a+' '+b+' '+c);
if((a>b)and(a>c)) then
Writeln('Наибольшее '+a)
else if(b>c) then
Writeln('Наибольшее '+b)
else
Writeln('Наибольшее '+c);
if((a<b)and(a<c)) then
Writeln('Наименьшее '+a)
else if(b<c) then
Writeln('Наименьшее '+b)
else
Writeln('Наименьшее '+c);
end.
<em>var a, b, c, n :integer; </em>
<em>procedure max(a,b:integer; var c :integer); </em>
<em>begin </em>
<em> if a>b then c:=a else c:=b; </em>
<em>end;</em>
<em>begin</em>
<em> read (a,b,c);</em>
<em> max(a,b,a);</em>
<em> max(a,c,a);</em>
<em> write (a);</em>
<span><em>end.</em></span>
<span>writeln(a:6:2,' 'b:6:2,' ',с:6:2);</span>
Всего за цикл чертежник перемещается на 5(0-2+4)=10 по х и 5(1+3-5)=-5 по у, то есть можно считать, что из начальной точки он один раз сместился на (10;-5) и попал в точку (-1;-1). чтобы узнать, где он был изначально, "перемещаем" его обратно, для этого нужно поменять знаки на противоположные. из (-1;-1) чертежник перемещается на (-10;5) и попадает в точку (-11;4)
ответ: 1)
Зайди на сайт(http://4aynikam.ru/) там с лева конвертер, пиши любое число и он те перевидёт в любую степень))И таблица