9. запись в реляционной бд - это: а) столбец таблицы, содержащий отдельное свойство (атрибут) объектаб) - id135462820210216 от амир250 16.02.2021 03:39

Question

Информатика: 9. запись в реляционной бд - это: а) столбец таблицы, содержащий отдельное свойство (атрибут) объектаб) строка таблицы, содержащая информацию об отдельном объектев) диапазон некоторых величин определённых типовг) ячейка таблицы, содержащая любую информацию​

амир250 · Accepted Answer

1.
var
k, sum, n, i: integer;
A: array of integer;
begin
writeln('Введите размерность массива: ');
readln(n);
SetLength(A, n);
writeln('Введите K: ');
readln(k);
writeln('Введите ', n, ' элементов массива :');
for i := 0 to n - 1 do
begin
readln(A[i]);
if A[i] mod k = 0 then sum := sum + A[i];
end;
writeln('Результат: ', sum);
end.

2.
var
c, k, n, i: integer;
B, A: array of integer;
begin
k := 1;
writeln('Введите размерность массива: ');
readln(n);
SetLength(A, n + 1);
writeln('Введите ', n, ' элементов массива :');
for i := 1 to n do
begin
readln(A[i]);
if A[i] = 0 then
begin
inc(c);
SetLength(B, c + 1);
B[k] := i;
inc(k)
end;
end;
writeln('Позиции нулевых элементов: ');
for i := 1 to c do write(B[i]:3);
end.

MOGZ ответил