Объяснение:
В интернете предоставляется много разнообразных услуг, таких как: доставка еды, оплата коммунальных услуг, оплата штрафа, запись на приём в врачу, интернет магазин и доставка из него на дом. и многое другое.
В нашей жизни это очень важно и полезно, особенно в пандемию. По этому это уже стало неотъемлемой частью нашей жизни. Мы уже не представляем жизнь без интернета и тех многих услуг которые мы получаем там каждый день.
Не знаю, возможно я немного не так понял вопрос, по этому если что сорри.
var
a, z: real;
X:array[1..20] of real;
i: integer;
begin
readln(a, z);
X[1] := a;
for i:=2 to 20 do
X[i] := X[i-1] * z;
for i:=1 to 20 do
writeln(X[i])
end.