С++ Тема "Множества" Задать множество S состоящее из символов. Разделить множество S на три подмножества: А – символы русского алфавита, Б – латинские символы, В – цифры.

Проверялось на Ruby

0006 - нормально принимается
-0 - нормально принимается, операция унарный минус
7,0  - как число не принимается, принимается как массив
7. - не принимается, нужно после точки указать ноль
+0.3 - не принимается, нет операции унарный плюс
.3 - не принимается, требует дописать нолик в начале, хотя в других средах может прокатить
2/3 - нормально принимается, хотя следует учитывать что в данном случае деление целочисленное
Е-1 - не принимается, в Ruby нет такой записи числа
8Е0 - не принимается, в Ruby нет такой записи числа
0Е-4  - не принимается, в Ruby нет такой записи числа
2*Е5 - не принимается, в Ruby нет такой записи числа
e  - не принимается, считается необьвленной переменной

Program mm;
var a:array[1..12] of integer;
begin
for i:=1 to 12 do begin
а[1]:=5;
 а[2]:=4;
 а[3]:=-3;
 а[4]:=1;
 а[5]:=0;
а[6]:=-4;
 а[7]:=(у тебя не написано);
 а[8]=25;
 а[9]=-8;
 a[10]=-5;
 а[11]=-17;
 а[12]=-1;
end;
writeln('Вот исходный массив');
for i:=1 to 12 do writeln('A[',i,']=',a[i]); 
for i:=1 to 12 do begin
if (A[i]<0) then a[i]:=1;
if (a[i]>0) then a[i]:=-5;
end;
writeln('Вот полученный массив');
for i:=1 to 12 do writeln('A[',i,']=',a[i]); 
writeln(' Введите 12 чисел');
for i:=1 to 12 do readln(A[i]);          (это доп оценка)
end.