1.в программе а: первый цикл for заполняет массив array, случайными числами из указанного диапазона, в цикле while происходит поиск пары чисел по условию начиная с 3го элемента. Если находят выводят, что такая пара есть, в противном случае что такой пары нет.
в программе б:
Вводтся число n, дальше будет использоваться для поиска, дальше как и в программе а, заполняем массив случайными числами в цикле for, в repeat, мы движемся по массив, пока не встретим наше значение n, если встретили, выводим: такое число есть в массиве, в противном случае, такого числа нет.В repeat until реализован линейный алгоритм поиска.
Буду благодарен за отметку "Лучший ответ"
все вопросы в коментарии
4.ТОЛЬКО БОГ
ответ:Поле базы данных - это столбец таблицы, содержащий значения определенного свойства.
Строки таблицы являются записями об объекте; эти записи разбиты на поля столбцами таблицы, поэтому каждая запись представляет собой набор значений, содержащихся в полях.
Запись базы данных - это строка таблицы, содержащая набор значений свойств, размещенный в полях базы данных.
Каждая таблица должна содержать, по крайней мере, одно ключевое поле, содержимое которого уникально для каждой записи в этой таблице. Ключевое поле позволяет однозначно идентифицировать каждую запись в таблице.
Ключевое поле - это поле, значение которого од нозначно определяет запись в таблице
Объяснение:
var a1,an,d,n,i:integer;
begin
readln(a1,d);
readln(n);
an:=a1;
for i:=2 to n do an:=an+d;
writeln('an = ',an);
end.
2.
function f(a1,d,k:integer):integer;
begin
if k=1 then f:=a1 else f:=f(a1,d,k-1)+d;
end;
var a,r,n:integer;
begin
readln(a,r);
readln(n);
writeln('an = ',f(a,r,n));
end.
Пример:
3 2
5
an = 11