по информатике 6 класс нужны вопросы по учебнику​

Картинка

Объяснение:

На схеме цикл:

1) у = 2 * х   -   вычисляет у

2) выводит на экран значения х и у

3) х = х+1   -   увеличивает значение х на 1

4) х <= 0   -   проверяет условие (если да, то начинается сначала)

x = -5

y = 2 * -5 = -10

x = -5       y = -10

-4 <= 0     (да)

y = 2 * -4 = -8

x = -4       y = -8

-3 <= 0     (да)

y = 2 * -3 = -6

x = -3       y = -6

-2 <= 0     (да)

y = 2 * -2 = -4

x = -2       y = -4

-1 <= 0     (да)

y = 2 * -1 = -2

x = -1       y = -2

0 <= 0     (да)

y = 2 * 0 = 0

x = 0       y = 0

1 <= 0     (нет)

1)
var
    s: string[6];
    n: integer;

begin
    s := 'отлично';
    n := length(s);
    writeln(length('отлично'));
    writeln(n);
end.

Изначально выставлен тип string[6], значит если присвоить строку больше, то ее обрежет по 6 символов, вот и весь прикол
ответ 6

2) рисунок

3)var
    s, s1: string;
    n: integer;

begin
    s := 'информатика';
    s1 := copy(s, 3, 5);
    n := pos(s, s1);
    writeln('s=', s);
    writeln('s1=', s1);
    writeln('n=', n);
end.

Вывод
s=информатика
s1=форма
n=0

Все верно, в s1 не содержится s, а наоборот