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

ПОМОГИТЕ, ПОЖАЛУЙСТА)))

Приложения:

Ответы

Автор ответа: ЧумнойДоктор99

0

А1 - 1
А2 - 2
А3 - 3
А4 - 2
В1 - (Есть такой гриб я его не помню)
В2 - кислорода
С1 - ????

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

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

Интересные вопросы

Предмет: Английский язык, автор: Аноним

Заполните пропуски модальными глаголами can, may, must.

6 лет назад

Предмет: Физика, автор: неизвестноно

Помогите выбрать правильный ответ и разобраться в задании какие правила применять -тема Электромагнитная индукция

6 лет назад

Предмет: Химия, автор: vika500261

Дам 20 баллов. Написать уравнение реакции

6 лет назад

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

сократите дробь x^3+5x^2-9x-45/(x-3)(x+5) и найдите значение получившегося выражения при x=-5

9 лет назад

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

даны действительная матрица размера nx(n+1),действительные числа a1....an+1,b1....bn+1,натуральные числа p,q(p<=n,q<=n+1)Образовать новую матрицу размера (n+1)x(n+2) вставкой после строки сномером p данной амтрицы новой строки с элементами a1...an+1 и последующейй вставкой после столбца с номером q нового столбца с элементами b1...bn+1
const n=30;
var i,j,p,q:integer;
c:array[1..n,1..n+1] of integer;
a:array[1..n+1] of integer;
b:array[1..n+1] of integer;

begin
readln(q,p);

For i:=1 to n do
For j:=1 to n+1 do
c[i,j]:=random(28)+1;

begin
for i:=1 to n+1 do
p:=random(28)+1;
end;
for j:=1 to n+1 do begin//
q:=random(28)+1;
end;

for i:=n downto p do//
for j:=1 to n+1 do
c[i+1,j]:=c[i,j];

for j:=1 to n+1 do c[p,j]:=a[i];

for j:=n+1 downto q do
for i:=1 to N+1 do
c[i,j+1]:=c[i,j];
for i:=1 to n+1 do c[i,q]:=b[i];

for i:=1 to n do
begin
for j:=1 to n+1 do
write(c[i,j]:2);
writeln;
end;
end.
помогите исправить ошибки или сделайте пожалуйста уже готовую программу(паскаль).Заранее спасибо

9 лет назад