var
A, r:real;
N, s:integer;
begin
s := 1;
write('a = '); readln(a);
write('n = '); readln(n);
r := a;
while r <= n do
begin
writeln(s);
inc(s);
r := r * a;
end;
if a > n then
writeln(a , ' в любой степени >= 1 будет больше числа ', n);
end.
Кодировка влияет на объём одного символа, например в кодировке КОИ-8 один символ весит 1 байт(8 бит), а в кодировке unicode - 2 байта(16 бит)
Искусственные,естественные
Извиняюсь, но я не силен в JavaScript, поэтому могу предложить вид программы на С и все пояснить.
Если надо то вот:
#include <iostream>
using namespace std;
int main()
{
int n;
cin >> n;
int le[n];
for(int i=0;i<n;i++){
cin >> le[i];
}
int j=0;
for(;j<n-2;j++){
cout << le[j] << ", ";
}
cout << le[j] << " и " << le[j+1] << endl;
return 0;
}