В текстовом файле хранится некоторый текст. Определить количество строк, в которых встречается не меньше двух ‘!’ и длина строки больше заданного ч

@Макс13 · Регистрация: 10.03.2012

Author24 — интернет-сервис помощи студентам

В текстовом файле хранится некоторый текст. Определить количество строк, в которых встречается не меньше двух ‘!’ и длина строки больше заданного числа n.
может-быть кто-нибудь знает?совершенно не понял эту тему

Добавлено через 22 часа 0 минут
кто может помочь?

@КонецСвета · 13.03.2012, 22:12

Pascal

uses crt;
 var s:string;
     f:text;
     n,i,k:byte;
 
 begin
 write('n=');
 readln(n);
 assign(f,'C:\in.txt');
 reset(f);
 while not (Eof(f)) do
       begin
       k:=0;
       readln(f,s);
       for i:=1 to length(s) do
           if s[i]='!' then inc(k);
       if (k>1) and (length(s)>n)
          then writeln(s);
       end;
 close(f);
 readln;
 end.

@Макс13 0 / 0 / 0 Регистрация: 10.03.2012 Сообщений: 19
		1
	В текстовом файле хранится некоторый текст. Определить количество строк, в которых встречается не меньше двух ‘!’ и длина строки больше заданного ч 13.03.2012, 21:18. Показов 1997. Ответов 1 Метки нет (Все метки) В текстовом файле хранится некоторый текст. Определить количество строк, в которых встречается не меньше двух ‘!’ и длина строки больше заданного числа n. может-быть кто-нибудь знает?совершенно не понял эту тему Добавлено через 22 часа 0 минут кто может помочь? 0

	13.03.2012, 22:12

В текстовом файле хранится некоторый текст. Определить количество строк, в которых встречается не меньше двух ‘!’ и длина строки больше заданного ч

Решение