<span>var a,b,c:real; begin write('a b c ? '); readln(a,b,c); writeln(b*b-4*a*c:0:7); readln end.</span>
<span>9 Килобайт=73728 бит
</span><span>73728/1536=48 сек
</span><span><span>1024*48=49152 бит=6164</span> байт
</span>
Чем мышь лучше сенсорного экрана?Серьёзно?Это очевидно!Сенсорный экран требуется в куда большим уходом. с мышкой куда проще.+Сенсорная может зависнуть и мы не поймем что мы на тыкаем .. С мышкой такое реже происходит... Я могу много примеров привести если нужно
<span>program ves;
const
A1='легкая категория';
A2='средняя категория';
var
b : integer;
begin
write('введите вес спортсмена *пусто* = ');
readln(b);
if b < 59 then writeln(A1) else writeln(A2);
readln;
end.</span>