program mas;
var
massive: array[0..1000] of integer;
n, i: integer;
begin
massive[0] := 2;
write('Введите количество элементов массива: ');
read(n);
for i := 0 to n - 1 do
begin
write(massive[i], ' ');
massive[i + 1] := massive[i] + 2;
end;
end.
Объяснение:
Максимальный размер массива - 1001 элемент.
program mas; // Название программы
var
massive: array[0..1000] of integer; // Целочисленный массив
n, i: integer; // Переменные, отвечающие за количество чисел в массиве и счётчик.
begin // Начало программы
massive[0] := 2; // Первое значение массива = 2
write('Введите количество элементов массива: '); // Вывод сообщения в консоль
read(n); // Считываем значение переменной n с клавиатуры
for i := 0 to n - 1 do // Идём от 0 до n - 1 индекса (n - 1, т. к. идём с нулевого индекса)
begin // Начало цикла
write(massive[i], ' '); // Вывод значения массива с индексом i
massive[i + 1] := massive[i] + 2; // Следующий элемент массива = текущий элемент массива + 2
end; // Конец цикла
end. // Конец программы
Овощи и фрукты, которые мы покупаем в супермаркетах, скорее всего, обрабатывали химическими веществами, чтобы увеличить срок хранения. Свой негативный вклад могли внести сборщики плодов, также существует вероятность, что они пострадали при транспортировке.
Поэтому простого мытья проточной водой перед их употреблением явно недостаточно. Чтобы не нанести вреда организму и не ухудшить состояние собственного здоровья, необходимо обработать свежие фрукты и овощи таким образом, что полностью смоются остатки химических препаратов, а также возможные бактерии и вирусы, объясняет Joinfo.com
Традиционный метод – мытье водой с яблочным уксусом. Для этого наполните большую салатницу водой и добавьте туда яблочный уксус (правильные пропорции – по столовой ложке уксуса на литр воды). Оставьте овощи или фрукты в уксусной воде на пять минут, а затем тщательно смойте липкие загрязнения. В случае картофеля, моркови или пастернака не возбраняется использовать чистую щетку. Останется тщательно сполоснуть продукты под струей холодной воды.
