Если я правильно понял условие, то...
var a,b,c:integer;
integer;
begin
readln(a,b,c);
If (a+b<100) or (a+c<100) or (b+c<100) then
writeln(1)
else
writeln(0)
<span>end.</span>
<span>Один бит, один символ. </span>
<span>1200 бит/с 1200 символов/с </span>
<span>и т.д. </span>
Универсальный значит удобный. Подходит для всего
ні, не завжди
Все залежить від :
-розміру файла,
-найстройкі корзини,
- звідки видаляеця інформація.