Информационная деятельность - это совокупность действий, направленных на удовлетворение информационных потребностей граждан, юридических лиц и государства. В целях удовлетворения этих потребностей органы государственной власти и органы местного и регионального самоуправления создают информационные службы, системы, сети, базы и банки данных. Порядок их создания, структура, права и обязанности определяются Кабинетом Министров Украины или другими органами государственной власти, а также органами местного и регионального самоуправления.
mvv-155
06.02.2023
// F# open System let anyNumberSymbol = "?" let replaceSymbolOnIndex (str:string) (number:int) (index:int) = String.Format("{0}{1}{2}", str.Substring(0, index), number, str.Substring(index+1)) let rec getAllValues (valueStr:string) = let index = valueStr.IndexOf(anyNumberSymbol) if index > -1 then let newStrings = [0..9] |> Seq.map (fun x -> replaceSymbolOnIndex valueStr x index) newStrings |> Seq.collect (fun x -> getAllValues x) else [valueStr] |> List.toSeq let getResults (numbers:string list) = List.nth numbers 0 |> getAllValues |> Seq.map (fun firstNumber -> List.nth numbers 1 |> getAllValues |> Seq.map (fun secondNumber -> List.nth numbers 2 |> getAllValues |> Seq.map (fun resultNumber -> if Int32.Parse(firstNumber) + Int32.Parse(secondNumber) = Int32.Parse(resultNumber) then [String.Format("{0} + {1} = {2}", firstNumber, secondNumber, resultNumber)] else [] ) |> Seq.collect (fun x -> x) ) |> Seq.collect (fun x -> x) ) |> Seq.collect (fun x -> x) |> Seq.toArray [<EntryPoint>] let main argv = let inputString = System.Console.ReadLine() let numbers = inputString.Split('+', '=') |> Array.map (fun x -> x.Trim()) if numbers.Length = 3 then let results = getResults (numbers |> Array.toList) if results.Length > 0 then Console.WriteLine(results |> Seq.fold (fun result x -> result + "\n" + x) "") else Console.WriteLine("No results") Console.ReadKey(true) |> ignore 0 else 1
В целях удовлетворения этих потребностей органы государственной власти и органы местного и регионального самоуправления создают информационные службы, системы, сети, базы и банки данных.
Порядок их создания, структура, права и обязанности определяются Кабинетом Министров Украины или другими органами государственной власти, а также органами местного и регионального самоуправления.