Не понял точно, что значит в развернутом виде, но если ты имел ввиду разложить на десятки, то вот:10000+3000+600+60+3
Начало
Условие
Решение
Вывод
Конец
Ответ:
1) 1 Тбайт
2) 0,5 Мбайт
3)500 Кбайт
4)1600 байт
Почта, телеграф, радио, телефон, телевизор, компьютер. Вроде так
<h3>PascalABC.NET 3.4.2, сборка 1881 от 19.11.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
begin
var R := Sqrt(ReadReal('x=')+Pi/4);
R.Println;
end.
<h2>Пример</h2><h3>x= 45.3243</h3><h3>6.79041222337771 </h3>