-module(sum_test). -export([sum/1,print/0]). -import(lists,[seq/2]). sum([H|T])->sum(T)+H; sum([])->0. print()-> {ok,[Value]}=io:fread("plese input data:","~d"), io:format("n=~w~n",[sum(seq(1,Value))]).