1 / 1 / 0
Регистрация: 06.06.2010
Сообщений: 54
1

Создать текстовый файл. Прочитать его и определить, сколько раз в нём встречается буква «а»

08.06.2010, 15:00. Показов 3438. Ответов 4
Метки нет (Все метки)

Создать текстовый файл. Прочитать его и определить, сколько раз в нём встречается буква «а».
вот я написал программу при компиляции все в норме но не запускает пишет exited with exitcode = 2

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
program pr1;
uses crt;
var f1:text;
s:string;
i,k:integer;
begin clrscr;
assign (f1, 'D:\zas\p.txt'); 
reset (f1); k:=0;
while not eof (f1) do begin
readln (f1,s); for i:=1 to length(s) do
if (s[i]='a') or (s[i]='A') then k:=k+1;
writeln(s); end;
writeln('v faile ',k,' Bykv a');
close(f1);
readln;
end.
я сам создал на диске D папку zas в ней САМ создал p.txt может это должна программа создавать или мне надо в это p.txt текст набрать? я пробовал текст в p.txt набирал тоже самое пишет удалил p.txt всеравно прога не работает! посмотрите пожалуйста что не так я же старался!
__________________
Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
08.06.2010, 15:00
Ответы с готовыми решениями:

Прочитать файл TWO определить, сколько раз в нем встречается буква "a"
Прочитать файл TWO определить, сколько раз в нем встречается буква <<a>> Составить блок-схему...

Дан текстовый файл F. Найти, сколько раз встречается в нем слово S
Просто без выходная ситуация надо решить задачи... Просто умоляю кто нибудь...

Определить сколько всего раз в слове встречается его первая буква
Помогите, пожалуйста, решить две задачи. 1) Дано слово. Определить сколько всего раз в нем...

Для каждого элемента массива определить, сколько раз в нем встречается его минимальная цифра
Считать из текстового файла input.txt число N. Заполнить одномерный массив из N элементов...

4
Идеи становятся силой...
121 / 121 / 64
Регистрация: 08.12.2009
Сообщений: 445
08.06.2010, 15:06 2
только что набрал в файле такой рандом символов
Pascal
1
//asdasdas
запустил программу твою и выдало такой результат:
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
program pr1;
 
uses
  crt;
 
var
  f1: text;
  s: string;
  i, k: integer;
 
begin
  clrscr;
  assign(f1, 'd:\p.txt');
  reset(f1); 
  k := 0;
  while not eof(f1) do 
  begin
    readln(f1, s); 
    for i := 1 to length(s) do
      if (s[i] = 'a') or (s[i] = 'A') then k := k + 1;
    writeln(s); end;
  writeln('v faile ', k, ' Bykv a');
  close(f1);
  readln;
end.
{в файле 3 буквы а}
1
1 / 1 / 0
Регистрация: 06.06.2010
Сообщений: 54
08.06.2010, 15:17  [ТС] 3
Цитата Сообщение от Hidalgo08 Посмотреть сообщение
только что набрал в файле такой рандом символов
Код Pascal1 //asdasdas
уважаемый
Hidalgo08, я сам создал p.txt сам написал в него и прога не работает! куда писать то подскажите пожалуйста!
0
Идеи становятся силой...
121 / 121 / 64
Регистрация: 08.12.2009
Сообщений: 445
08.06.2010, 19:01 4
Цитата Сообщение от chifok Посмотреть сообщение
куда писать то подскажите пожалуйста!
у тебя что не работает, или ошибку выдает?*
0
Почетный модератор
64270 / 47569 / 32739
Регистрация: 18.05.2008
Сообщений: 115,182
08.06.2010, 19:14 5
chifok, А что, у Вас файл так и называется p.txt ? извините что спрашиваю, но такое бывает, файл нужно назвать просто р , а расширение .txt программа сама добавляет.
1
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
08.06.2010, 19:14
Помогаю со студенческими работами здесь

Для каждого элемента массива определить, сколько раз в нём встречается его минимальная цифра
Не могу разобраться, накручена больно задача: Считать из файла число N. Заполнить одномерный...

Определить сколько раз в тексте встречается буква А и сколько раз буква С
:wall:Определить сколько раз в тексте встречается буква А и сколько раз буква С

Пользователем задана строка. Подсчитать сколько раз встречается буква «а» и буква «с», если чаще встречается буква «а», значит вывести на экран выраж
Пользователем задана строка. Подсчитать сколько раз встречается буква «а» и буква «с», если чаще...

Определить, сколько раз в строке встречается буква a, сколько цифр и сколько заглавных букв
4)Вводится строка символов, заканчивающаяся точкой. Определите, сколько раз в ней встречается...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
5
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2023, CyberForum.ru