VAR a,b,c,mx,mn: LongInt; BEGIN Read(a,b,c); if (a >= b)and(a >= c) then mx := a; if (b >= a)and(b >= c) then mx := b; if (c >= a)and(c >= b) then mx := c;
if (a <= b)and(a <= c) then mn := a; if (b <= a)and(b <= c) then mn := b; if (c <= a)and(c <= b) then mn := c;
Writeln('Минимальное число = ', mn); Writeln('Максимальное число = ', mx); END.
VAR x,y: Real; BEGIN Read(x, y);
if (x <= 0)and(y >= 0) then Write('True') else Write('False'); END.
VAR n: LongInt; BEGIN Read(n); if (n > 0) then Inc(n); Write(n); END.
Вопрос с подвохом, пропускная меряется не от возможной передачи на стороне провайдера или пользователя, а от версии протокола 2СH (2 цэ-аш). Рассмотрим 2 последние версии. Протокол 2015 года поддерживал пропускную вплоть до 20 MB/WEBM. Стандарт нового протокола поразили многих экспертов, скорость была снижена вдвое. Но сделано это было в связи с отказом многих производителей сетевого оборудования устанавливать расширяющие микросхемы PassCODE для поддержки тех самых 20 MB/WEBM. Может в будущем, с большим распространением PassCODE пропускную поднимут, но пока приходится с этими ограничениями смирится и перекодировать WEBM что несомненно, приведет к ухудшению их качества.
a,b,c,mx,mn: LongInt;
BEGIN
Read(a,b,c);
if (a >= b)and(a >= c) then mx := a;
if (b >= a)and(b >= c) then mx := b;
if (c >= a)and(c >= b) then mx := c;
if (a <= b)and(a <= c) then mn := a;
if (b <= a)and(b <= c) then mn := b;
if (c <= a)and(c <= b) then mn := c;
Writeln('Минимальное число = ', mn);
Writeln('Максимальное число = ', mx);
END.
VAR
x,y: Real;
BEGIN
Read(x, y);
if (x <= 0)and(y >= 0) then Write('True')
else Write('False');
END.
VAR
n: LongInt;
BEGIN
Read(n);
if (n > 0) then Inc(n);
Write(n);
END.