Номер 4
program Other;
var
a,b: integer;
begin
a:=5;
b:=0;
if a = 1 then
{Next action...}
else
begin
b:=b+a;
a:=a-1;
end;
end.
Общее
можно посылать текст
можно посылать вложение типа фотографии, если хватает места/веса
указывается адрес получателя и отправителя
может быть не доставлено из-за неверного адреса или из-за тех. сбоев.
можно перенаправить письмо
дата прохождения через почтовую службу может служить подтверждением времени в различных спорах и разбирательсивах
возможно использовать шифрование
плюсы бумажной почты:
письмо и вложения реальны и не требуют спец. средств для прочтения
очень разнообразные способы доставки - голубиная почта, курьерская почта и т.д.
кол-во спама обычно меньше, чем в эл. почте
можно посылать письмо без указания обратного адреса
плюсы эл. почты:
скорость доставки
бесплатно
значительно легче шифровать/расшифровать, чем бумажную
возможность получить подтверждение о получении, прочтении
возможность настройки автомат. ответа
возможность "массовой рассылки"
копия отправленного письма остается у отправителя
получить письмо можно из любой точки интернета, а не в определенном месте
можно иметь множество эл. почтовых ящиков.
<span>function Power(x,y:real):real;
{ (C) Puporev }
begin
if x=0 then
Power:=0
else
if x>0 then
Power:=exp(ln(x)*y)
else
Power:=-exp(ln(abs(x))*y);
end;
var
x,y:real;
begin
readln(x,y);
writeln(power(x,y));
end<span>.</span></span>
Var s: string;
begin
s:='дисковод';
writeln (copy(s,6,2)+copy(s,3,2))
end.