Трехзначное десятичное число оканчивается цифрой 3.если эту цифру переместить на первое слева место в числе , то есть с нее будет начинаться запись нового числа ,то это новое число будет на единицу больше утроенного исходного числа . найдите исходное число

var s,r: real;

begin

writeln('введите значение r: ');

readln(r);

s: =pi*sqr(r);

writeln('целая часть s = ',int(s));

writeln('дробная часть s = ',frac(s));

writeln('округление s = ',round(s));

end.

у семи нянек дитя без глаза.

28 символов * 2 = 56 байт

56 * 8 = 448 бит.

ответ. 448 бит.

program xxx;

var s : string;

        а : integer;

begin

    writeln ('введите слово-');

    readln (s);

    а: = length(s)

    writeln ('длина слова=', a);

    readln

end.