Сместиться в точку (2,0)
опустить перо
сместиться в точку (0,5)
сместиться в точку (4,3)
сместиться в точку (3,0)
<span>сместиться в точку (5,6)
</span><span>сместиться в точку (7,0)
</span><span>сместиться в точку(8,0)
</span><span>сместиться в точку (10,5)
</span><span>сместиться в точку (6,3)
</span><span>сместиться в точку (7,0)
</span><span> сместиться в точку(8,0)
</span><span>сместиться в точку(2,0)</span>
Var a:array[1..1000] of integer;
i,n,max,m:integer;
begin
write('n=');readln(n);
for i:=1 to n do read(a[i]);
max:=a[1];m:=1;
for i:=2 to n do if a[i]>max then
begin max:=a[i]; m:=i; end;
a[m]:=a[1];a[1]:=max;
for i:=1 to n do write(a[i],' ');
writeln;
<span>end.
</span>
проверяем все двузначные нечётные числа, делящиеся нацело на 3 и выявляем наименьшее из них, имеющие остаток 4 при делении на 5:
15; 21; 27; 33; <u> </u><u>39 </u> ...
ответ 39
Ответ этого вопроса коктейль
Все это относится к информатическим технологиям.