Пусть Команда1 = <span>Сместиться на (х1,у1)
Чтоб вернуться в ту же точку</span>, надо чтоб смещение было (0;0)
dx = 0 = 2(x1+3+2)-6 = 0, x1=-2
dy = 0 = 2(y1+2+1)-4 = 0, y1=-1
Команда1 = <span>Сместиться на (-2,-1)</span>
Правильный ответ это 2) рисунок
S:=5, k:=0
По условию: если s>k, то k:=k+2 (соответственно k=0+2=2) и s:=s+k, т.е. s=5+2=7.
Будет выведено число 7, т.к. в программе перед условием переменной s присваивается значение, которое больше значения переменной k.
<em>// PascalABC.NET 3.3, сборка 1633 от 10.02.2018</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var a:=ArrRandom(ReadInteger('n='),0,15); a.Println;
a.Where(t->t>a.First).Println
end.
<u>Пример</u>
n= 15
8 8 9 3 5 10 12 4 1 8 8 6 13 7 6
9 10 12 13
<em>// PascalABC.NET 3.2, сборка 1401 от 14.03.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var a:=ArrFill(50,1); a.Println
end.
<u>Замечание: полученный массив имеет 50 элементов, но индексы [0..49]</u>
<em>2. "Школьный вариант"</em>
var
a:array[1..50] of integer;
i:integer;
begin
for i:=1 to 50 do begin
a[i]:=1;
Write(a[i]:2)
end;
Writeln
end.