Предмет: Биология, автор: пацанизварфеса

Написать классификации

Ответы

Автор ответа: 89096490469

0

по возрастанию:
вид
род
семейство
отряд
класс
тип
царство

Предыдущий вопрос

Следующий вопрос

Похожие вопросы

Предмет: Математика, автор: safaalkina

1 и 2 до завтра прошу!! Задачу номер один по действиям и столбик если надо,лучше прислать фото решения

7 лет назад

Предмет: Алгебра, автор: pichika

Квадратичная функция задана формулой
y
=
(
x
+
3
)
2

−
1
.
Укажите координаты вершины параболы и уравнение её оси симметрии.
Укажите правильный вариант ответа:
Вершина (3; -1), ось симметрии y = -1
Вершина (-3; 1), ось симметрии x = -3
Вершина (3; -1), ось симметрии x = 3
Вершина (-3; -1), ось симметрии x = -3

7 лет назад

Предмет: История, автор: aarops600

Какие города были захвачены во время восстания Ивана Болотникова?
Помогите, пожалуйста (

7 лет назад

Предмет: Литература, автор: vasilina034

Время написания стихотворений "Зимний вечер" и "Зимние утро"? Краткое описание из жизни поэта в это время.

10 лет назад

Предмет: Информатика, автор: fatid

У меня есть готовый код паскаля (но я не знаю, по какой причине у меня не получается его увидеть как требуется в задании (Составьте программу, которая определяет количество отрицательных, количество положительных и количество нулей среди введенных чисел. Значение N вводится с клавиатуры.)
Можно переделать код, но без использования uses crt и т.д. Сделать нужно с циклом for while и/или repeat. К слову, пользуюсь Pascal.ABC.NET (не знаю, какие значения и где нужно вводить, чтобы получить результат, требуемый в задании).

program zadacha3;
var
n, o, p, k, i: integer;
a: real;
begin
repeat
write('N = ');
readln(n);
until (n > 0);
i := 0;
k := 0;
p := 0;
o := 0;
repeat
write('Ввод:');
readln(a);
i := i + 1;
if a < 0 then o := o + 1 else
if a > 0 then p := p + 1 else k := k + 1;
until i = n;
writeln('Кол-во положительных: ', p);
writeln('Кол-во отрицательных: ', o);
writeln('Кол-во нулей: ', k);
readln;
end.

10 лет назад