1)когда найдется элемент равный заданому 2)отсекается 1 элемент 3)Произведение элементов массива, которые лежат в промежутке [40;55)
в паскале как и почти любом ЯП есть переменные,которые содержат имя и значение,например (i: =0)->имя переменной i,значение 0.Значение переменной можно изменить,имя переменной нельзя.Массивы это переменные которые хранят несколько значений.Чтобы обратиться к определенному значению масива использовать синтаксис имямасива[индексмасива],например чтоб получить 3 элемент масива a использовать a[3].repeat (expression) until(boolean) это цикл,в котором будет выполняться expression(любой код) до тех пор пока boolean не будет верно.Boolean это выражение значение которого будет равно true/false(правда/неправда).Напрмер в repeat i:=i+1; until (a[i]=x) or (i=10); к переменной i будет прибавляться 1 до тех пор пока a[i] не равно x или i будет меньше 10(так как в масиве всего 10 элементов,если например i будет 11 это будет выход за границу массива).Каждый блок выполнения в цикле(в нашем случае i:=i+1) называется итерацией.В цикле for(a to max) в a идет создание переменной-счетчика(в нашем случае создание переменной i со значением 0) ,потом пишется to и идет максимальное значение счетчика.И итерации этого цикла(if (a[i]=>40) and (a[i]<55) then s:=s*a[i]; ).В конце каждой итерации автоматически значение счетчика увеличивается на 1.До тех пор пока счетчик меньше или равен max итерации будут выполняться. А вообще в интернете очень много обучающих статей по данной теме
Начнем с того, что в базе данных физический порядок следования записей при индексировании не меняется. Создается индексный файл. А вот при выборке данных при активном индексном файле данные будут выбираться в порядке возрастания индекса, что по результатам равнозначно тому, как если бы записи действительно были упорядочены соответствующим образом.
Теперь по задаче. При индексировании будут получены следующие значения ключей: 24 18.5 22 15.5 20 и в соответствии с ними будут выбраны записи в порядке 4-2-5-3-1, т.е. правильный ответ В)
Program pr;
uses crt;
Var x, y:real;
Begin
x:=1;
While x<=20 do
Begin
y:=5*x-2;
Writeln('x=', x:6:2, 'y=', y:6:2);
x:=x+2;
end;
readln;
end.