Var
n: array[1..12] of integer;
i: integer;
begin
for i:=1 to 12 do
begin
n[i]:=random(31)-20;
writeln('n[', i, '] = ', n[i]);
end;
for i:=1 to 12 do
if n[i]<0 then write(i, ' ');
<span>end.</span>
Решения в прилагаемых изображениях.
Смотри.
икс не кратно 7 записывается так:
x mod 7≠0
пример:
If (x mod 7≠0) then begin
mod это деление нацело, то есть
14 mod 7=0 - 14 делится нацело на 7.
только вместо знака ≠ надо писать знаки
если не сработает, попробуй
Колонти́тул (фр. colonne — столбец и лат. titulus — надпись, заголовок) — строка, расположенная на краю полосы набора, и содержащая заголовок, имя автора, название произведения, части, главы, параграфа и т. д. Размещается на всех страницах печатного издания, за исключением титульных листов, выходных данных, страниц и вклеек, заполненных иллюстрациями, а также начальных и спусковых полос. Также колонтитул может отсутствовать на левых страницах.
Традиционно применяется верхний колонтитул, располагающийся над основным текстом, но иногда применяют боковой и нижний колонтитулы. Колонтитул может быть совмещён с колонцифрой.
