Только что созданный текстовый файл получил расширение txt
Программы голосового набора текста.
Позволяют вводить текст в ПК, надиктовывая его в микрофон.<span />
Var
f:Text;
n,k:integer;
begin
Assign(f,'input.txt');
Reset(f);
n:=0;
while not Eof(f) do begin Read(f,n); Inc(k) end;
Close(f);
Assign(f,'output.txt');
Rewrite(f);
Writeln(f,k); Writeln(k);
Close(f)
end.
.. = 2^4 + 2^3 + 2^0 = 16 + 8 + 1 = 25.
<span>Алфавит шестнадцатеричной системы счисления - 0,1,2,3,4,5,6,7,8,9,A,B,C,D,E,F</span>