1. С каких программ может также выполняться установка пароля на документ? 2. Для чего нужна защита информации? - id1239273220210502 от Loi00 02.05.2021 04:09

Question

Информатика: 1. С каких программ может также выполняться установка пароля на документ? 2. Для чего нужна защита информации? 3. Как можно проверить документ на подлинность? 4. Что означает этот знак ©? Где вы встречали этот знак и какая информация прописывается рядом с этим знаком?​

Loi00 · Accepted Answer

Unit Unit1;
{$mode objfpc}{$H+}
interface
uses Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, StdCtrls, Spin, Math;
type
{ TForm1 }
TForm1 = class(TForm) Button1: TButton; Edit1: TEdit; Edit2: TEdit; Label1: TLabel; Label2: TLabel; Label3: TLabel; Label4: TLabel; procedure Button1Click(Sender: TObject); private { private declarations } public { public declarations } end;
var Form1: TForm1;
implementation
{$R *.lfm}
{ TForm1 }
procedure TForm1.Button1Click(Sender: TObject);begin Form1.Label4.Caption:=FloatToStr(tan((StrToFloat(Form1.Edit1.text)*2)+StrToFloat(Form1.Edit2.text)));end;
end.

MOGZ ответил