М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
andrey100573p018xj
andrey100573p018xj
19.11.2022 22:26 •  Информатика

Электрондық кестедегі деректер форматтарын атаңдар


Электрондық кестедегі деректер форматтарын атаңдар

👇
Открыть все ответы
Ответ:
moskvarodina345
moskvarodina345
19.11.2022

Название эры Продолжительность млн лет Животный и растительный мир

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

Архей начался примерно 3500 млн лет назад фотосинтез, эукариотические клетки, половой процесс, многоклеточность

Протерозой начался 2500 млн лет назад двусторонняя симметрия, трехслойность, системы органив, задний отдел кишечника и анальное отверстие

Палеозой начался 534 млн лет назад появление организмов с минеральным скелетом, дифференцировка тела растений на ткани, разделение тела животных на отделы, образование челюстей, появления поясов конечноустей у позвоночных. Расчленение тела растений на органы, преобразование плавников в наземные конечности, появление органов воздушного дыхания, внутреннее оплодотворение, плотные яйцевые оболочки, ороговевание кожи, образование семян, образование пыльцевой трубки и семени

Мезозой начался около 248 млн лет назад 4-х камерное сердце, полное раздерение артериального и венозного кровотока, молочные железы, возникновение цветка и плода, образование матки

Кайнозой начался более 65 млн лет назад интенсивное развитие коры головного мозга, мышление, прямохождение

Объяснение:

здесь много напиши основную информацию

4,4(34 оценок)
Ответ:
Соня2340
Соня2340
19.11.2022
//Pascal
var
  A: array[1..10] of integer;
  i, Count: byte;
  sum: integer;
begin
  randomize;
  writeln('Сгенерированный массив');
  for i := 1 to 10 do
  begin
    A[i] := random(8)-3;
    if A[i] < 0 then
      sum := sum + A[i];
    write(A[i],' ');
  end;
  writeln;
  writeln('Сумма отрицательных элементов = ', sum);
  writeln;
  writeln('Измененный массив');
  for i := 1 to 10 do
  begin
    if A[i] >= 0 then
    begin
      A[i] := 0;
      Count := Count + 1;
     end;
    write(A[i], ' ');
  end;
  writeln;
  writeln('Количество нулевых элементов = ', Count);
end.

Массив из 10 элементов заполнить случайными числами от - 3 до 4 включительно. найти сумму отрицатель
4,7(2 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ