Сместиться на (a, b) (где a, b – целые числа), перемещающую чертёжника из точки с координатами (x, y) в точку с координатами (x + a, y + b если числа a, b положительные, значение соответствующей координаты увеличивается, если отрицательные – уменьшается. например, если чертёжник находится в точке с координатами (4, 2), то команда сместиться на (2, –3) переместит чертёжника в точку (6, –1). запись повтори k раз команда1 команда2 команда3 конец означает, что последовательность команд команда1 команда2 команда3 повторится k раз. чертёжнику был дан для исполнения следующий алгоритм: повтори 4 раз сместиться на (–3, –4) сместиться на (1, 3) сместиться на (1, –2) конец какую единственную команду надо выполнить чертёжнику, чтобы вернуться в исходную точку, из которой он начал движение? 1) сместиться на (–4, –12) 2) сместиться на (–12, –4) 3) сместиться на (12, 4) 4) сместиться на (4, 12)

Считаем
4(-3+1+1)=-4 (х)
4(-4+3-2)=-12 (у)
Чтобы вернуттся в исходную точку нужно поменять знаки.
Т.е. ответ: 4)(4,12)

ты т у п о й. д е б и л мен саған не керек едым қазақ халқының дәстүрлі емес інім нури да бар бірақ ол кезде ол не дейді қазақ тілінде тест на әк тастан жасалған дән мен саған не болды деп көрсетеді және бұл да бар екен не было қазақ тілінде неше әріп не зоч да көп болуы тиіс ал запрос да көп болды ал аккаунт мен бжб да бір басқа да көптеген қазақ халқының саны шамамен екі жүз айлық есептік көрсеткіш мөлшерінде айыппұл салуға не екі жүз он бес сыры да осында қазақ тілінде неше септік көмектес септігі тиеді деп аталады ал аккаунт мен бжб матем мен саған не болған жағдайда оны

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

19

20

21

22

23

24

25

26

27

28

29

30

31

program pr;

 

var

 n, i, k, m: integer;

 

begin

 k := 0;

 writeln('Введите количество чисел последовательности');

 readln(n);

 if n <= 1000 then  

 begin

   for i := 1 to n do

   begin

     writeln('Введите ', i, ' число:');

     readln(m);

     if abs(m) <= 30000 then

     begin

       if (m mod 3 = 0) and (m mod 10 = 2) then

         inc(k);

     end

     else  

     begin

       writeln('Число по модулю не должно превышать 30000');

       exit;  

     end;

   end;

   writeln('Количество элементов последовательности кратных 3 и оканчивающихся на 2: ', k);

 end

 else  

   writeln('Количество не должно превышать 1000');

end.

Объяснение: