3. If not (A = B) Then
begin
A = A + B;
B = A + B;
end
else
begin
A = 0;
B = 0;
end;
10бит 20бит 2байта 1010байтов 1Кбайт
Электро́нная по́чта (англ. email, e-mail [iˈmeɪl], от англ. electronic mail) — технология и служба по пересылке и получению электронных сообщений (называемых «письма», «электронные письма» или «сообщения») между пользователями компьютерной сети (в том числе — Интернета)[1].
Электронная почта по составу элементов и принципу работы практически повторяет систему обычной (бумажной) почты
Var x1,y1,x2,y2,d:real;
begin
Writeln('Координаты х и у первой точки: ');
readln(x1,y1);
Writeln('Координаты х и у второй точки: ');
readln(x2,y2);
d:=sqrt(sqr(x2-x1)+sqr(y2-y1));
Writeln('Расстояние между ними: ',d);
<span>end.</span>