1 круговая
2 диаграмма
3 наглядно
4 таблица
5 схемы , столбчатая
6 иллюстрация
7 текст
лови
Var
a:array [1..10] of real;
ran:real;
i:integer;
begin
for i:= 1 to 10 do
begin
ran:=100-random(200)+1;
a[i]:= ran;
if a[i]< 0
then begin
write(a[i],' ');
writeln(i);
end;
end;
end.<span>
</span>
0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20. Воть;) Хотя это не точно...
При таком раскладе количество комбинаций будет равно 63.
50 Кбайт = 51200 байт = 409600 бит
409600÷16÷40=640бит на одну строку.
640÷16=40 символов
Ответ: в строке 40 символов.