Пробуй поменять
#include<windows.h>
на
#define _WIN32_WINNT 0x0500
#include<windows.h>
Объяснение:
в 128 символьном алфавите 1 символ равен 7 битам
1120/6= 160
С++ - компилируемый статически типизированный язык программирования общего назначения*)))Поддерживает такие парадигмы программирования как процедурное программирование, объектно-ориентированное программирование, обобщённое программирование, обеспечивает модульность, раздельную компиляцию, обработку исключений, абстракцию данных, объявление типов (классов) объектов, виртуальные функции :))))
Var s: string; i, count: integer;
begin
write('Введите текст: '); readln(s);
for i := 1 to length(s) do
if(s[i] <> ' ') then inc(count);
writeln('Кол-во символов: ', count);
<span>end.</span>