Roman

Сейчас потянуло на функциональное программирование. Выбрал Haskell как наиболее универсальный ЯП.

Могу посоветовать больше чем книгу. Вот тут .
Там тебе в первую очередь нужен раздел Общение в котором увидишь ссылки на телеграмм чаты.
Тебе нужен @haskell_learn — чат для новичков
И про книги те которые действительно стоит прочитать тебе там тоже расскажут, а можешь сразу спросить в основном канале @haskellru — основной хаскельный чат

(Char -> Char) -> (Char -> Char) -> Char -> Char

succ <$> succ <$> "abc" 
fmap (succ . succ) "abc"

let f = fmap succ "abc" 
let f' = fmap succ f

Enum a => (a -> a) -> (a -> a) -> a -> a

Или так

λ> myfun = (^2)
λ> myfun <$> [1, 2, 3]
[1,4,9]

λ> myfun = (^2)
λ> map myfun [1, 2, 3]
[1,4,9]

Что больше подходит под определение

Есть функция:
pow2 x = x ^ 2

Есть такой список:
[1, 2, 3, 4, 5]

Как вызвать функцию для всех элементов списка

Хотя еще

squares :: Num a => [a] -> [a]
squares lst = do
    x <- lst
    return (x ^ 2)

squares' :: Num a => [a] -> [a]
squares' lst = lst >>= \x -> return (x ^ 2)

squares'' :: Num a => [a] -> [a]
squares'' lst = [x ^ 2 | x <- lst]

fx f lst = [f x | x <- lst]

main = do 
  print $ fx (^2)   [1, 2, 3]
  print $ squares   [1, 2, 3]
  print $ squares'  [1, 2, 3]
  print $ squares'' [1, 2, 3]

Совсем по-простому (ооочень упрощенно)

module Main where

import System.IO

main :: IO ()
main = do
  content <- readFile "file.dat"
  putStrLn content

  putStr "enter x = "

  -- Флюшим вывод не забываем про ленивость языка
  hFlush stdout 

  x <- getLine 

  print (read x :: Int)

  writeFile "file.dat" x

Остальное сам в рамках понимания языка.

О Haskell по-человечески (Д.Шевченко)
https://www.ohaskell.guide

А.Холомьев (более продвинутое)
https://anton-k.github.io/ru-haskell-book/book/hom...

Ну и Липовача learnyouahaskell.com есть на русском
Уилл Курт "Программируй на haskell" тоже.

Все остальное (а это мноого чего) скорее для тех кому это нужно.
В любом случае можно поискать ответы тут https://wiki.haskell.org/Haskell

Например начать с https://wiki.haskell.org/Introduction_to_IO там далее есть секция
Further reading

Надо вот это --> For a comprehensive tutorial on using IO monad, look at the Haskell I/O inside: Down the Rabbit's Hole

Сдвинь объявления и определения ф-ций в положенное место.

main = do
        putStrLn "Start point: "
        start <- getArg
        putStrLn "End point: "
        end <- getArg
        putStrLn "Max cost: "
        costStr <- getArgNum
        let cost = read costStr :: Double
        mapM_ putStr $ astar graph1 start end cost
        putStrLn " "
----------------CHECK BUKVI--------
getArg :: IO String -- И так все что ниже
getArg = do        
        line <- getLine

Но у тебя там еще другие проблемы.
getArgNum ...

getArgNum :: IO Double
getArgNum = do
                line <- getLine
                if numOk line
                                then return (read line :: Double)
                                else do
                                putStrLn "Please input a proper number:"
                                getArgNum  -- У тебя было getArg

costStr <- getArg -- у тебя было getArgNum
let cost = read costStr :: Double