|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
30.09.2011, 09:03 | #1 |
Новичок
Джуниор
Регистрация: 29.09.2011
Сообщений: 6
|
нужно исправить программу!
program Text;
uses crt; var a:string; n,i:integer; begin clrscr; n:=0; write ('Vvedit deyakiy text: '); read(a); for i:=1 to length(a) do begin if a='+' then n:=n+1; end; write ('V zhomy teksti ',n,' znakiv +'); end. НУЖНО ЧТОБЫ СИМВОЛ + СЧИТАЛО ТОЛЬКО ДО ТОЧКИ В ТЕКСТЕ. |
30.09.2011, 09:07 | #2 |
Новичок
Джуниор
Регистрация: 29.09.2011
Сообщений: 6
|
program Text;
uses crt; var a:string; n,i:integer; begin clrscr; n:=0; write ('Vvedit deyakiy text: '); read(a); i:=1; while a[i]<>'.' do begin if a[i]='+' then n:=n+1; i:=i+1; end; write ('V zhomy teksti ',n,' znakiv +'); end. Этот вариант не хочет работать( |
30.09.2011, 09:12 | #3 |
Форумчанин
Регистрация: 23.10.2008
Сообщений: 460
|
если нужно узнать длину строки то должен работать(точно не помню, в Object pascal точно работает)
length(s) где s - строка, а результат который возвращает функция - целое число которое является длиной строки S |
30.09.2011, 09:19 | #4 |
Новичок
Джуниор
Регистрация: 29.09.2011
Сообщений: 6
|
Нужно написать программу подсчета знаков "+" в строке до знака "."(точка).
|
30.09.2011, 09:26 | #5 |
Форумчанин
Регистрация: 21.10.2010
Сообщений: 588
|
Код:
Пользователь не знает, чего он хочет, пока не увидит то, что он получил.
Для благодарностей WMR R145235935681 |
30.09.2011, 09:43 | #6 |
Новичок
Джуниор
Регистрация: 29.09.2011
Сообщений: 6
|
Спасибо огромнейшее) а не подскажите какая программа из листинга сделает блок-схему?
|
30.09.2011, 10:02 | #7 |
Пользователь
Регистрация: 13.10.2010
Сообщений: 91
|
|
30.09.2011, 10:33 | #8 |
Новичок
Джуниор
Регистрация: 29.09.2011
Сообщений: 6
|
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
нужно исправить программу в с++ | tymac9n | Общие вопросы C/C++ | 1 | 12.05.2011 14:53 |
нужно исправить программу в с++ | tymac9n | Помощь студентам | 1 | 12.05.2011 00:13 |
нужно исправить программу) | ilnar21 | Помощь студентам | 1 | 30.10.2010 22:42 |
Очень нужно исправить программу в Delphi !!! | Grifon_666 | Помощь студентам | 0 | 12.05.2010 21:42 |
Помогите исправить программу нужно очень срочно! | Алена | Помощь студентам | 3 | 04.11.2007 18:28 |