Регистрация
derwi
17.02.2021 04:20
Информатика
Есть ответ 👍

Создать текстовый файл, состоящий из 2-3 предложений. определить, есть ли в нем слова и сколько.

221
334
Посмотреть ответы 2

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

Айым200411
Айым200411
4,6(21 оценок)
Предполагается, что файл имеет имя  d: \f.txt.  var   i,n: integer;     s: string;     f: text; begin assign(f,'d: \f.txt'); reset(f); readln(f,s); repeat   if s[1] in ['a'..'z','a'..'z'] then n: =n+1;   i: =pos(' ',s);   delete(s,1,i);   until i=0; writeln(' слов: ',n); end.
Calleron
Calleron
4,5(50 оценок)

Либо зелёный овал либо розовый овал я думаю розовый овал

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