Для какого из указанных значений числа x истинно высказывание ((х> 3)и не(x< 4))или(x< 1)? 1)1 2)2 3)3 4)4

Преобразуем условие
((x>3)И НЕ(x<4))ИЛИ(x<1) = ((x>3) И (x≥4)) ИЛИ (x<1) =
x<1 ИЛИ x≥4, т.е. x ∉ [1;4)
В интервал не входит только число 4 - это и есть ответ.

4) 4

опустить перо

нц 4 раз

сместиться на вектор (0,1)

сместиться на вектор (2,1)

сместиться на вектор (2,-1)

сместиться на вектор (0,-1)

сместиться на вектор (-2,-1)

сместиться на вектор (-2,1)

сместиться на вектор (-2,-1)

сместиться на вектор (2,-1)

сместиться на вектор (2,1)

сместиться на вектор (2,1)

кц

поднять перо

сместиться на вектор (-16,-3)

опустить перо

нц 4 раз

сместиться на вектор (0,1)

сместиться на вектор (2,1)

сместиться на вектор (2,-1)

сместиться на вектор (0,-1)

сместиться на вектор (-2,-1)

сместиться на вектор (-2,1)

сместиться на вектор (-2,-1)

сместиться на вектор (2,-1)

сместиться на вектор (2,1)

сместиться на вектор (2,1)

кц

Объяснение:

1)

var

   a, n, s: integer;

begin

   write('n = ');

   Readln(n);

   

   a := 1;

   while a <= n do

   begin

       s := s + a;

       a := a + 1;

   end;

   writeln(s);

end.

2)

var

   a, n: integer;

begin

   write('n = ');

   Readln(n);

   a := 1;

   while a <= n do

   begin

       writeln(2 * a);

       a := a + 1;

   end;

end.

3)

var

   a, b: integer;

begin

   write('Введите числа a и b: ');

   Readln(a, b);

   

   while a <= b do

   begin

       writeln(a, '^2 = ', sqr(a));

       a := a + 1;

   end;

end.