В фантастических «Путешествиях Гулливера», написанных Дж. Свифтом, рассказывается, в частности (ч. III, гл. 8), об удивительных людях, которые решили обходиться без языка и вели беседы не с помощью слов, а с помощью самих предметов, предъявляемых «собеседнику». Фантазия Свифта наделила каждого такого мудреца большим мешком, в котором он носил с собой все предметы, нужные для «разговора».
В действительности обмен информацией в человеческом обществе строится на другом, прямо противоположном принципе: адресату сообщения предъявляются вовсе не предметы, о которых идет речь, не те или иные «реальности», служащие темой сообщения, а некие заместители этих реальностей, представители их, вызывающие в сознании образ, представление или понятие об этих реальностях, в частности, и тогда, когда самих этих реальностей поблизости нет.
Const n=30;
var a:array[1..n] of integer;
i,min:integer;
begin
min:=1000;
for i:=1 to n do
begin
readln(a[i]);
if (a[i] div 100>=1) and(a[i]<min) then min:=a[i];
end;
if (min=1000) then writeln('Такого числа нет')
else writeln('Минимальное 3-значное число равняется ',min);
<span>end.</span>
<span><span><span>если я понял задание, то думаю так:
а)3252
</span><span>б)36576
</span></span></span>
Функция sqr(x) служит для возведения аргумента х в квадрат, поэтому представим a¹⁰ в виде максимально возможного набора операций возведения в квадрат.
a¹⁰ = a²·a⁸ = a²·(a⁴)² = a²·[(a²)²]²
var
a:real;
begin
Write('a=');
Read(a);
Writeln(a,'^10=',sqr(a)*sqr(sqr(sqr(a))))
end.
Тестовые решения
a=2
2^10=1024
a=3.18
3.18^10=105747.765633159
a=10
10^10=10000000000
a=318.53
318.53^10=1.07523505784868E+25
