Вниз
Скачать: CL | DM;

символы   Найти похожие ветки 

← →
Nostalgia ©   (2008-12-24 23:40) [0]

пожалуйста ,подскажите в чем ошибка и как бы её исправить. вот такая прога: нам дан текст; нужно найти кол-во цифр, которые идут в нём подряд.
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.


← →
{RASkov} ©   (2008-12-25 00:10) [1]

> [0] Nostalgia ©   (24.12.08 23:40)
> нужно найти кол-во цифр, которые идут в нём подряд

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


← →
Игорь Шевченко ©   (2008-12-25 00:17) [2]

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


← →
Германн ©   (2008-12-25 00:24) [3]


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

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


← →
Германн ©   (2008-12-25 00:26) [4]


> Nostalgia ©

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


← →
Anatoly Podgoretsky ©   (2008-12-25 00:52) [5]

Ну что вы девушку мучаете.


← →
Германн ©   (2008-12-25 00:55) [6]


> 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 01:02) [7]

Глюк!


← →
Nostalgia ©   (2008-12-25 21:21) [8]

{RASkov} :тут 4 цыфры. что ещё не ясно?


← →
palva ©   (2008-12-25 21:39) [9]


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

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


← →
Palladin ©   (2008-12-25 21:40) [10]


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

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


← →
Nostalgia ©   (2008-12-25 21:48) [11]

Palladin : и к чему это было сказано???


← →
Nostalgia ©   (2008-12-25 21:49) [12]

не смотрите на синтаксические ошибки. дело не в них


← →
Palladin ©   (2008-12-25 21:53) [13]

то что в вопросе - было скопировано и вставлено?


← →
Nostalgia ©   (2008-12-25 22:00) [14]

нет


← →
Palladin ©   (2008-12-25 22:05) [15]


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

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


← →
Nostalgia ©   (2008-12-25 22:11) [16]

всё с вами ясно короче......ничё...сама сделаю.извините за беспокойство.


← →
Игорь Шевченко ©   (2008-12-25 22:19) [17]


> сама сделаю


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


← →
Тын-Дын ©   (2008-12-25 23:40) [18]

Удалено модератором


← →
Nostalgia ©   (2008-12-26 00:49) [19]

мдя...


← →
Германн ©   (2008-12-26 00:59) [20]


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

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



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.49 MB
Время: 0.008 c
2-1230386119
studenttgata
2008-12-27 16:55
2009.02.08
как объявить константу в записи record


2-1230401829
Nostalgia
2008-12-27 21:17
2009.02.08
одномерные массивы


15-1228938459
js jin
2008-12-10 22:47
2009.02.08
Загрузка страницы


2-1230564364
1234
2008-12-29 18:26
2009.02.08
меню


2-1229921494
Golden
2008-12-22 07:51
2009.02.08
Delphi + excel




   Наверх