Добавил:
Upload
Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз:
Предмет:
Файл:
module Main where
import Data.List
main = print $ [((x^2) + (y^2)) | x<-[1..10], y<-[1..10], x/=y ]
import Data.List
main = print $ [((x^2) + (y^2)) | x<-[1..10], y<-[1..10], x/=y ]
Соседние файлы в папке lab3