Какое число нужно написать вместо многоточия, чтобы цикл выполнился ровно 2 раза? i: =; while i< =8 do begin writeln('! '); i: =i+1 end;

I = 7
После первого прохождения цикла значение і увеличится на единицу (7 + 1 = 8), и цикл выполнится второй раз
После второго прохождения цикла значение і увеличится ещё на 1 (8 + 1 = 9), и условие цикла і <=8 перестанет выполнятся
ответ: 7

1)i:=7;
while i<=8 do begin
writeln('Привет!');
i:=i+1 =8

2)i:=8;
while i<=8 do begin
writeln('Привет!');
i:=i+1 =9
На следующий раз он уже не повторится
ответ: 7

В алфавитах ориентироваться легко: смотрим сколько цифр используется такое будет и название

0,1,2,3 - 4 цифры система счисления называется четверичная

0,1,2,3,4,5  - 6 цифр система счисления называется шестеричная

0,1,2,3,4,5,6,7,8  - 9 цифр система счисления называется девятеричная

0,1,2,3,4,5,6,7,8 ,9,А,В - 12 цифр система счисления называется двенадцатеричная (это если выписаны правильно все буквы и больше нет никаких. В случае, если есть ещё буквы C,D,E,F - СИСТЕМА СЧИСЛЕНИЯ БУДЕТ НАЗЫВАТЬСЯ ШЕСТНАДЦАТЕРИЧНАЯ)

// PascalABC.NET 3.2, сборка 1334 от 12.11.2016
begin
  var a:=ArrRandom(ReadInteger('n='),-50,50); a.Println;
  a:=a.Select(x->x div 2).ToArray;
  a.Println;
  var k1,k2:integer;
  Write('Введите k1,k2 (k1<=k2<=',a.Length,'): '); Read(k1,k2);
  Writeln('Произведение элементов с номерами [',k1,':',k2,'] равно ',
    a[k1-1:k2].Aggregate(biginteger(1),(m,n)->m*n))
end.

Пример
n= 13
12 34 -4 -18 23 45 -7 49 47 11 -24 39 31
6 17 -2 -9 11 22 -3 24 23 5 -12 19 15
Введите k1,k2 (k1<=k2<=13): 3 8
Произведение элементов с номерами [3:8] равно -313632