П О М О Г И Т Е, П О Ж А Л У Й С Т А! 1) С помощью датчика случайных чисел получить 15 вещественных чисел n (38<n<39).2) С
П О М О Г И Т Е, П О Ж А Л У Й С Т А! 1) С помощью датчика случайных чисел получить 15 вещественных чисел n (38<n<39). 2) С помощью датчика случайных чисел получить 20 целых чисел на диапозоне [0..5]. Вывести саму эту последовательность и все её нечетные элементы.
// PascalABC.NET 3.1, сборка 1256 от 21.06.2016 begin var s:=ReadlnString('n='); s:=('0'*(4-s.Length)+s); Writeln(Ord(s[:3].ToInteger=s[3:].Inverse.ToInteger)); end.