Скажите где ошибка? нужно найти периметр треугольника в pascal abc. program perimetr_treug; var a, b, c, p: real; begin writeln ('введите стороны треугольника); readln (a, b, c); p: =a+b+c; writeln ('p= ', p); end.

Попробуй так: var p,a,b,c: integer; readln(a); readln(b); readln(c); p: = a+b+c; writeln(' p=',p); end.

// pascalabc.net 3.2, сборка 1447 от 22.05.2017 // внимание! если программа не работает, обновите версию! begin   var n: =readinteger('количество строк в массиве: ');   var m: =readinteger('количество колонок в массиве: ');   writeln('*** исходный массив [',n,',',m,'] ***');   var a: =matrrandom(n,m,-99,99);   a.println(5); writeln(5*a.colcount*'-');   a.cols.select(x-> format('{0,5}',x.where(y-> y< 0).('');   println(' - суммы отрицательных'); end. пример количество строк в массиве: 5 количество колонок в массиве: 9 *** исходный массив [5,9] ***   -43  -96    34    82      3    92  -59    31    35     65    94    76    66    90  -39    26  -24    83     73  -92    94  -94    44  -35  -66    87  -46     90    56  -37  -60    -9    94      9  -76  -58   -16    97    65  -21  -86    64  -20    46  -26   -59 -188  -37 -175  -95  -74 -145 -100 -130 - суммы отрицательных

1) 64000 бит/с*16 c=1024000 бита/8=128000 байт=125 килобайт 2) n  =  2i    =  256      i  =   8 бит количество точек изображения равно: 1024   х 1024 = 1048576

8 бит  х  1048576  = 8388608 бита   =  1048.576  кбайт3) всего объем сообщения 3кб = 3072 байт = 24576 бит

на кодирования одного символа ушло 24576 : 6144 = 4 бит/символ

с 4 бит можно закодировать < 2^4 символов

ответ: символов меньше 16.