Всильно устаеревших учебниках под телеконференциями понимают организованный тематический обмен сообщениями между пользователями сети. сейчас это чаще называют форумами.чтобы стать участником форума, надо зайти на сайт форума, если требуется, зарегистрироваться, и общаться.другие сервисы - электронная почта, ip телефония, чаты и пр.
Var f:text; s:string; i,slo,ks:integer; k:real; begin assign(f,'text.in'); reset(f); while not Eof(f) do read(f,s); close(f); slo:=0; ks:=0; for i:=1 to length(s) do if s[i] in t then inc(slo) else begin; k:=k+slo; inc(ks); slo:=0; end; if s[length(s)] in t then begin; inc(ks); k:=k+slo; end; k:=k/ks; assign(f,'text.out'); rewrite(f); write(f,k); close(f); end.
Пример ввода(text.in): SIMPLE text Пример вывода(text.out): 5
