<em>// PascalABC.NET 3.3, сборка 1633 от 10.02.2018</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
ArrRandom(10,-50,50).Println.Sum.Println;
end.
<u>Пример</u>
31 19 1 -45 -14 -32 8 -46 46 -18
-50
121(10)=171(8)=1111001(2)=79(16)=121(10)
A B C D E F G H I J K L M N O P Q R S T U V W X Y Z
a b c d e f g h i j k l m n o p q r s t u v w x y z
1 2 3 4 5 6 7 8 9 0
Специальные знаки (через пробелы):
~ ! @ # $ % ^ & * ( ) – + _ = [ ] ; : ‘ “ , . / \ < > ? |
Ну.. Наверное математическая (формальная) логика
Т.к. нужно чтобы все цифры числа были либо четными либо нечетными
то будет больше тех чисел, у котрорых подходит больше цифр.
четные цифры до 10: 2,4,6,8;
нечетные цифры до 10: 1,3,5,7,9;
=>больше будет 5 значных нечетных чисел.
(2500 5 значных четных чисел и 3125 5 значных нечетных чисел)