//2 var a, b, c: real; begin write('Введите стороны треугольника A B C: '); readln(a, b, c); writeln('Периметр = ', a + b + c); end.
//3 var a, b: real; begin write('Введите стороны прямоугольника A B: '); readln(a, b); writeln('Площадь = ', a * b); writeln('Периметр = ', 2 * (a + b)); end.
//4 var a, b, c: real; begin write('Введите ребра A, B, C: '); readln(a, b, c); writeln('Площадь = ', (2*(a*b+b*c+a*c)):0:1); writeln('Объем = ', (a*b*c):0:1); end.
//5 var r: real; begin write('Введите радиус: '); readln(r); writeln('Длина окружности = ', (2 * pi * r):0:1); end.
2 байта
Объяснение:
всего 700 байт на 50 человек
700 : 50 = 14 байт на человека
т.к. алфавит кодировки состоит из 11 символов это влазит в 1 байт
всего символов в пароле 12 значит под код в записи отводится
12 * 1 байт = 12 байт.
14 байт - 12 байт = 2 байта - место для доп. сведений по одному пользователю