Регистрация
Nastya2oo3
20.01.2022 05:16
Информатика
Есть ответ 👍

2. Программы для распознавания текста Выбери программы для распознавания текста.
Gimp
O cuneiform
Free OCR
Opera

211
331
Посмотреть ответы 1

Ответы на вопрос:

apolinarii2006
apolinarii2006
4,5(12 оценок)

var

s: string;

i,count: integer;

begin

count: =0;

readln (s);

for i: =1 to length(s) do

if (s[i]=' ') then count: =count+1;

writeln ('в данной строке ',count+1,' слов');

end.

Популярно: Информатика