Какие бывают приспособления у растений для распространения? - №28059208

Какие бывают приспособления у растений для распространения?
- Предмет:
  Биология
- Автор:
  ringo
- 6 лет назад

Ответы 0

Добавить свой ответ

Еще вопросы

Письма на 8марта пожалуйста учителю
- Предмет:
  Русский язык
- Автор:
  aliyastephenson
- 6 лет назад
- Ответов:
  
  0
- Смотреть
Помогите разобрать коды что за что отвечает

procedure TForm1.Button1Click(Sender: TObject);
const
n=10;
var
m:array[1..n] of integer;
i,k: integer ;
s: string;
begin
randomize;
i:=0;
while i begin
i:=i+1;
m[i]:=random(10+1);
for k:=1 to i-1 do
if m[k]=m[i] then
begin
i:=i-1;
break;
end;
end;
for i:=1 to n do
s:=s+(IntToStr(m[i])+' ');
Memo1.Lines.Add(s);
end;
end.

procedure TForm1.Button1Click(Sender: TObject);
begin
if messagebox(handle, 'Идем на войну?' , 'Заголовок тактики', mb_iconinformation or mb_yesno) = mryes then
messagebox(handle, 'НАПАДАЕМ' , 'Пойдем на войну', mb_iconerror)
else
messagebox(handle, 'ОТСТУПАЕМ' , 'Не пойдем на войну ', mb_iconerror);
end;
procedure TForm1.Button2Click(Sender: TObject);
var
s:string;
begin
s:=inputbox('текст1','текст2','vnemanei');

showmessage(s);

inputquery('текст2','текст1',s);
showmessage(s);

end;

procedure TForm1.Button3Click(Sender: TObject);
begin
if opendialog1.execute=true then
label1.caption:=opendialog1.filename;
end;

procedure TForm1.Button4Click(Sender: TObject);
begin
if savedialog1.execute=true then
memo1.lines.savetofile(savedialog1.FileName);
end;

procedure TForm1.Button5Click(Sender: TObject);
begin
savepicturedialog1.execute;
end;
end.

procedure TForm1.BitBtn3Click(Sender: TObject);
begin
close;
end;

procedure TForm1.BitBtn1Click(Sender: TObject);
begin
Label2.Visible:=true;
bitbtn2.Visible:=false;
end;

procedure TForm1.BitBtn2Click(Sender: TObject);
begin
label2.caption:='Ждите повышения!';
end;

procedure TForm1.BitBtn2MouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
begin
bitbtn2.left:=random(clientwidth-30);
bitbtn2.Top:=random(clientheight-30);
end;
end.
- Предмет:
  Информатика
- Автор:
  gordonsherman
- 6 лет назад
- Ответов:
  
  0
- Смотреть
Запиши число 4 в виде дроби со знаменателем 5.
- Предмет:
  Математика
- Автор:
  nathanial
- 6 лет назад
- Ответов:
  
  2
- Смотреть
Помогите пожалуйста:напишитп 6 предложений с глаголом:"Present Simpl".(11 баллов)
- Предмет:
  Английский язык
- Автор:
  masonkron
- 6 лет назад
- Ответов:
  
  2
- Смотреть

How much to ban the user?

1 hour 1 day 100 years