Вопрос по информатике:
Соединить программу подсчета количества слов в тексте и программу создания csv файла(т.е. нужно подсчитать количество элементов в тексте и вывести отчет в csv-файл)
- 19.11.2017 06:34
- Информатика
- remove_red_eye 17170
- thumb_up 48
Ответы и объяснения 1
//предполагается что слова разделены пробелами
//предполагается что слово - это любой набор символов без пробела
var
f: text;
s: string;
i, k: integer;
begin
readln(s);
k := 1;
for i := 1 to Length(s) do
if s[i] = ' ' then k := k + 1;
assign(f, 'file.csv');
rewrite(f);
writeln(f, k, ',');
close(f);
writeln(k);
end.
- 20.11.2017 19:46
- thumb_up 41
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.