Деловая бумага, подтверждает факт или право, он завершен подписью
просто
var
Form1: TForm1;
h, g, s: integer;
implementation
{$R *.fmx}
procedure TForm1.Button1Click(Sender: TObject);
begin
h:=Round(Strtoint(Edit1.Text)/60);
g:=Round(h/60);
h:=h-g*60;
s:=h*60;
Showmessage(IntTostr(g)+'.'+IntTostr(h)+'.'+IntTostr(s));
end;
end.
только тут с небольшой ошибкой показывает. +-5 сек
end.
Ответ:
3
Объяснение:
Для десантной техники (Д-6, д-5) 200 метров при отделении от горизонтально летящего самолета (вертолета) на скорости не менее 140 км/ч и задержкой раскрытия ранца 3 секунды
180*47*50*8/8/1024 примерно равно 413 Кбайт.
Если каждый символ кодируется 8 битами информации.
Алфавит 64 = 2^6 - т.е. 6 бит каждый символ
v = 12 * 16 * 52 * 6 = 59904 бит / 8 = 7488 байт / 1024 = 7,3125 Кбайт