какова соленость морской воды если в 1т этой воды растворенно 22кг различных веществ а)0,22‰ б) 2,2‰ в)22‰ г)220‰ - №28059199

какова соленость морской воды если в 1т этой воды растворенно 22кг различных веществ

а)0,22‰ б) 2,2‰ в)22‰ г)220‰
- Предмет:
  География
- Автор:
  starr
- 6 лет назад

Ответы 1

А)-----------------------------
- Автор:
  puppylynn
- 6 лет назад
- 0
Добавить свой ответ

Еще вопросы

Фразеологизмы с местоимением СЕБЯ. Пожалуйста помогите! За ранее СПАСИБО!
- Предмет:
  Геометрия
- Автор:
  monkeymvgl
- 6 лет назад
- Ответов:
  
  1
- Смотреть
Составь и запиши небольшой рассказ употребляя синонимы шалить проказничать озорничать баловаться дурачиться Придумай заголовок к своему рассказу
- Предмет:
  Русский язык
- Автор:
  turnerbraun
- 6 лет назад
- Ответов:
  
  1
- Смотреть
Письма на 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
- Смотреть

How much to ban the user?

1 hour 1 day 100 years