Регистрация
анечка103
Есть ответ 👍

ответить на во Как производится предварительное обследование лесосеменных объектов перед заготовкой семян и оценка их качества?

2.2 Заготовка лесосеменного сырья

2.3 Назовите особенности заготовки и хранения лесосеменного сырья основных пород.

2.4 Предварительное обследование лесосеменных объектов перед заготовкой семян и оценка их качества

2.5 Теоретические основы переработки и хранения лесосеменного сырья

2.6 Как производится извлечение семян из шишек хвойных пород?

2.7 Как производится хранение и транспортировка семян?

2.8 Для чего нужна паспортизация семян и отбор образцов для проверки их посевных качеств?

249
431
Посмотреть ответы 1

Ответы на вопрос:

madishalabaev
madishalabaev
4,8(83 оценок)

1)var

a: array [1..30] of integer;

i, s, k: integer;

begin

for i := 1 to 30 do//заполнение рандомными числами(от -15 до 50, включая и -15 и 50) массив

a[i] := random(-15, 50);

for i := 1 to 30 do//сумма элементов и подсчет кратных 3

begin

s := s + a[i];//сумма элементов

if a[i] mod 3 = 0 then//подсчет кол во кратных 3

k := k + 1;

end;

writeln('Исходный массив');

for i := 1 to 30 do

writeln('A[', i, '] = ', a[i]);

writeln('Сумма элементов массива: ', s);

writeln('Кратных 3: ', k);

end.

извини бы дальше но дела но вот подсказки:

2) метод пузырька посмотри

3) там через функцию поиска и удаления

Объяснение:

Популярно: Другие предметы