Аутентификация-это процесс подлинности чего-либо.
Переданное по сети в открытом виде,плохо,так как не защиты от перехвата!
Scania , MAN , КАМАЗ.Schmitz, volvo volkswagen
Var
r:real;
function preob(n:integer):real;
begin;
preob:=sqrt(n)+n;
end;
begin
r:=preob(5)/2+preob(3)/2+preob(7)/2;
writeln(r);
<span>end.</span>
//Pascal ABC.NET v3.1 сборка 1172
Var
a:real;
begin
readln(a);
if a>0 then writeln('Положительное, ',a/2) else
if a<0 then writeln('Отрицательное, ',sqr(a)) else
writeln('0');
end.
Пример ввода:
-12
Пример вывода:
-, 144
Найди в интернете , все таки 10 класс уже