Как это задание сделать в Access? ​

Відповідь:

Адресация — осуществление ссылки (обращение) к устройству или элементу данных по его адресу; установление соответствия между множеством однотипных объектов и множеством их адресов; метод идентификации местоположения объекта. Простая (англ. flat addressing) — указание объекта с идентификатора или числа, не имеющего внутренней структуры. Расширенная (англ. extended addressing) — доступ к запоминающему устройству с адресным пространством, бо́льшим диапазоном адресов, предусмотренного форматом

Пояснення:

Program Sarumyana;
const n=10;
var a:array[1..n] of integer;
tri, nol, odd, i: integer;
  begin
  writeln('*** alphaues is thinking... ***');
  tri:=0;
  nol:=0;
  odd:=1;
  for i:=1 to n do
  begin
    write('Введите ',i,'-e число ');
    readln(a[i]);
    if a[i] mod 3 = 0 then tri := tri + a[i];
    if a[i] = 0 then nol := nol + 1;
    if i mod 2 = 1 then odd := odd * a[i]
  end;
  write('Строка чисел: ');
  for i:=1 to n do
  begin
    write(a[i],' ');
  end;
   writeln();
   writeln('Сумма элементов, кратных 3, равна ',tri);
   writeln('Количество нулевых элементов = ',nol);
   writeln('Произведение элементов, стоящих на нечётных местах, = ',odd);
end.