Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

символы [D7, XP]

Nostalgia © (2008-12-24 23:40:00)
пожалуйста ,подскажите в чем ошибка и как бы её исправить. вот такая прога: нам дан текст; нужно найти кол-во цифр, которые идут в нём подряд.
Program d;
uses SysUtils;
const n=10;
var a:array [1..n] of char;
kol,kol1,i,max:integer;
begin
for i;=1 to n do
read(a[i]);
kol:=0;
for i:=1 to n do
if (a[i]>='o') and (a[i]<='9') then
begin
while not ' ' do
kol:=i;
i:=i+1;
end;
max:=kol;
if kol1>max then
kol1:=max;
writeln ('vvod max',kol1);
readln;
readln;
end.

Германн (2008-12-26 00:59:00) [1]

> Nostalgia © (26.12.08 00:49) [19]
>
> мдя...
>

Что пробуешь сам(а)? И нифига не понимаешь?
Тяжелый случай :( Особенно в сессионный период!
"Ты всё пела? Это дело. Так поди же..." Ох как умён был дедушка Крылов.

Nostalgia (2008-12-26 00:49:00) [2]
мдя...

Тын-Дын (2008-12-25 23:40:00) [3]
Удалено модератором

Игорь Шевченко (2008-12-25 22:19:00) [4]

> сама сделаю

мудрое решение. советую руководствоваться им до создания постов на форуме.

Nostalgia (2008-12-25 22:11:00) [5]
всё с вами ясно короче......ничё...сама сделаю.извините за беспокойство.

Palladin (2008-12-25 22:05:00) [6]

> Nostalgia © (25.12.08 21:49) [14]

то бишь, ты, бездарность, вопросило "в чем ошибка", предоставив заведомо бредовый код, не соответствующий действительности и еще имеешь наглость хамски реагировать на справедливые замечания по предоставленному коду?

Nostalgia (2008-12-25 22:00:00) [7]
нет

Palladin (2008-12-25 21:53:00) [8]
то что в вопросе - было скопировано и вставлено?

Nostalgia (2008-12-25 21:49:00) [9]
не смотрите на синтаксические ошибки. дело не в них

Nostalgia (2008-12-25 21:48:00) [10]
Palladin : и к чему это было сказано???

Palladin (2008-12-25 21:40:00) [11]

> Nostalgia © (25.12.08 21:21) [8]

вот как о от 0 отличать научишься может что нибудь и получится... ведь не каждый круглшок это тот самый
а так же рекомендую изучить клавиатуру... очень сильно подробно... а то там круглешков целых больше одного и все разные

palva (2008-12-25 21:39:00) [12]

> тут 4 цыфры. что ещё не ясно?

А почему не 3 или 2 ? Они ведь тоже идут подряд.
Потому и спрашивают, потому что не понятен смысл вопроса.

Nostalgia (2008-12-25 21:21:00) [13]
{RASkov} :тут 4 цыфры. что ещё не ясно?

Anatoly Podgoretsky (2008-12-25 01:02:00) [14]
Глюк!

Германн (2008-12-25 00:55:00) [15]

> Anatoly Podgoretsky © (25.12.08 00:52) [5]
>
> Ну что вы девушку мучаете.
>

Login: Nostalgia
E-mail: 210319912@rambler.ru
ICQ: 309911259 (добавить)
Реальное имя: Itaka
Дата рождения: 21.03.1991 знак зодиака: Овен
Город: Харьков
Пол: Мужской

!!!
Глюк?
:)

Anatoly Podgoretsky (2008-12-25 00:52:00) [16]
Ну что вы девушку мучаете.

Германн (2008-12-25 00:26:00) [17]

> Nostalgia ©

Попробуй написать комментарий к каждой строке кода. Глядишь вопрос сам собой и рассосётся.

Германн (2008-12-25 00:24:00) [18]

> ошибка синтаксическая

Алгоритмические тоже есть.

Игорь Шевченко (2008-12-25 00:17:00) [19]
ошибка синтаксическая

{RASkov} (2008-12-25 00:10:00) [20]
> [0] Nostalgia © (24.12.08 23:40)
> нужно найти кол-во цифр, которые идут в нём подряд

Тут их сколько:
12бла758бла0320бла
? 4? 9? Что-то не понятно условие

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »