Программа для Pascal.
PROGRAM Z;
USES CRT;
VAR
A,B:INTEGER;
M:ARRAY[1..10] OF INTEGER;
BEGIN
CLRSCR;
WRITELN('VVEDITE ELEMENTY');
FOR A:=1 TO 10 DO READLN(M[A]);
WRITELN('CHETNIE ELEMNTY : ');
FOR A:=1 TO 10 DO IF A MOD 2 = 0 THEN WRITELN (M[A]);
READKEY
<span>END.</span>
1. На Америку движется два урагана, но мне кажется все жители в безопасности.
2. 1 килобайт (Кб) = 1024=2 в 10 степени байт
3. Молоко является источником кальция.
Извиняюсь, но я не силен в 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;
}