33 +10 =43 различных символов для номера
2^6 >≈ 43 ---> 6 бит для кодировки одного символа
6 * 6 =36 бит для кодировки одного номера =36 : 8 = [6 байт]
В условии нет концовки, должен быть вопрос: сколько памяти занимает n-е количество номеров
6 * n = ........байт
Var a,b,c,p: Real;
begin
writeln('Введите a,b,c,p');
readln(a,b,c,p);
writeln('S=',sqrt(p*(p-a)*(p-b)*(p-c)));
end.
Ты о чем? я не понимаю суть твоего вопроса, напиши в коментарии к ответу