его тип, и компьютер по нему распознает какой программой открыть файл.
Как обновить поток чтения я хз, поэтому тупо закрыл и открыл снова :)))
В поисковике забей открой с 1 по 3 сайт
var
s,i: integer; {s,i - цел}
begin
s := 0;
for i := 1 to 5 do
s := s + i;
write(s)
end.
Не знаю как для других,для меня сложная задача,поэтому сделал её как смог