Ответ:
false (ложь)
Объяснение:
- ∧ - конъюнкция, логическая И
- ∨ - дизъюнкция, логическая ИЛИ
- Конъюнкция равна true только в том случае, когда оба выражения истинны. Например: x ∧ y только тогда, когда x, y = true.
- Дизъюнкция равна true всегда, кроме момента, когда x, y = false.
(1 > 2) ИЛИ (1 < 5) И (1 > 10) =
= false ИЛИ true И false =
= false ИЛИ false =
false
Var
s:string;
i:integer;
begin
readln(s);
for i:=1 to length(s) do
if i mod 2 =0 then write(s[i],s[i])
else write(s[i]);
end.
<span>да мы можем увидеть какие есть деревья ,животные и научиться различать их))</span>
<span>Передатчик.</span>
<span>Устройств, имеющих в своём составе передатчик, с помощью которого происходит передача информации, много. </span>
<span>Все сетевые устройства для цифровой передачи данных, независимо от среды передачи данных - коммутаторы, роутеры, беспроводные точки доступа, - всё активное сетевое оборудование чего-нибудь передаёт и принимает (с помощью приёмника). </span>
<span>аналоговые устройства - радио, телепередатчики.</span>
Unit Unit1;
interface
uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;
type TForm1 = class(TForm) Button1: TButton; Edit1: TEdit; Edit2: TEdit; Label1: TLabel;
procedure Button1Click(Sender: TObject);
private { Private declarations }
public { Public declarations } end;
var Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
begin
try
label1.Caption:=FloatToStr(StrToFloat(Edit1.Text)/StrToFloat(Edit2.Text));
except
On E : EZeroDivide do
ShowMessage('Деление на 0 запрещено : ');
end;
end;
end.<span>
</span>