i и j из файла читать не надо smile.gif
Их там нет smile.gif
А вместо read(tval); нужно написать read(f, tval); wink.gif
Ах да, после assign'ов еще надо написать reset(f); rewrite(f1);
И перед writeln(f1,summ); наверное нужно написать readln(f);
Вроде все smile.gif