Два довольно простых вопроса про контроль данных - Помощь студентам - Страница 2

Max_Grinyuk · 11.06.2009, 21:04

if length(переменка строки)=0 then строка пуста выводится сообщение, но не повторяется, а выводится другое поле, которое должно вводиться. Может через цикл попробовать?

Max_Grinyuk · 11.06.2009, 21:15

Ну вопрос можно по другому составить......как для массива записи типа string сделать проверку вводимых данных. Нужно чтобы при пустой строке выводило сообщение что строка пуста, и было предложено ввести ещё раз.

Цитата:

if (chislo in [0..2010]) then {то что нужно}

делал так, выдаёт ошибку, что-то про константу.

NSvirus · 11.06.2009, 21:56

Код:

repeat
readln(stroka);
 if length(stroka)=0 then writeln('Ошибка! Повторите ввод!');
until length(stroka)<>0

Max_Grinyuk · 11.06.2009, 22:44

NSvirus, спасибо! Теперь без ошибок всё!!!!
Теперь ошибка с числом. У меня в массив записи должно число вводиться, и егопроверить надо. Пробовал способы описанные выше, ошибки....

Hacker19_90 · 11.06.2009, 23:21

Цитата:

Сообщение от Max_Grinyuk

NSvirus, спасибо! Теперь без ошибок всё!!!!
Теперь ошибка с числом. У меня в массив записи должно число вводиться, и егопроверить надо. Пробовал способы описанные выше, ошибки....

Да да прошу прощения!!!!Слишком большой интервал!!!
тогда делай так

Код:

if (chislo >= 0) and (chislo < 2010) then {то, что нужно}

Max_Grinyuk · 11.06.2009, 23:38

Hacker19_90? мне кажется интервал тут не при чем....
а то что нужно, там что писать?

Hacker19_90 · 11.06.2009, 23:43

Что то не понял вопрос!!!
Давай те повнятнее я за компом уже ну так часа 22

Hacker19_90 · 11.06.2009, 23:47

Цитата:

Сообщение от Max_Grinyuk

Hacker19_90? мне кажется интервал тут не при чем....
а то что нужно, там что писать?

Error 76: Constant out of range Константа выходит за границы допустимых значений

Max_Grinyuk · 11.06.2009, 23:48

Hacker19_90, ого, а если не секрет, что так много? О_о
if (chislo >= 0) and (chislo < 2010) then {то, что нужно} вот я последнее {то, что нужно} не понял. что там написать?

Hacker19_90 · 11.06.2009, 23:50

Цитата:

Сообщение от Max_Grinyuk

Hacker19_90? мне кажется интервал тут не при чем....
а то что нужно, там что писать?

ААА!!!! Понял извиняюсь конечно!!! Ну если число по условию проходит,
то соответственно это то число которое тебе нужно!!! Вот и проводи над ним всякие вычисления, или что там по заданию

11.06.2009, 21:56	#13
NSvirus пропагандирую жизЪ Форумчанин Регистрация: 19.03.2007 Сообщений: 950	Код: `repeat readln(stroka); if length(stroka)=0 then writeln('Ошибка! Повторите ввод!'); until length(stroka)<>0` Посторонним В. Последний раз редактировалось NSvirus; 11.06.2009 в 22:00.

11.06.2009, 23:43	#17
Hacker19_90 Delphi Warrior Старожил Регистрация: 15.08.2008 Сообщений: 2,502	Что то не понял вопрос!!! Давай те повнятнее я за компом уже ну так часа 22 *Mess with the best, die like the rest.* (с) Hackers Лабораторные, курсовые на Delphi\Pascal\C++ ya.flex-freelance@yandex.ru Icq - 636-954-303

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Два небольших вопроса :)	f4rr3l	Паскаль, Turbo Pascal, PascalABC.NET	5	10.01.2009 12:44
Два тупых вопроса.	proglamer	Общие вопросы Delphi	2	10.04.2008 07:12
Два вопроса	Никки	Общие вопросы Delphi	2	19.01.2008 21:39
Два простых вопроса	Relrin	Общие вопросы Delphi	3	28.12.2007 16:00
два вредных вопроса:про асю и прикриплёные файлы файлы	steck	Свободное общение	3	17.06.2007 14:53

11.06.2009, 21:04	#11
Max_Grinyuk Пользователь Регистрация: 13.05.2009 Сообщений: 36	if length(переменка строки)=0 then строка пуста выводится сообщение, но не повторяется, а выводится другое поле, которое должно вводиться. Может через цикл попробовать?

11.06.2009, 22:44	#14
Max_Grinyuk Пользователь Регистрация: 13.05.2009 Сообщений: 36	NSvirus, спасибо! Теперь без ошибок всё!!!! Теперь ошибка с числом. У меня в массив записи должно число вводиться, и егопроверить надо. Пробовал способы описанные выше, ошибки....

11.06.2009, 23:38	#16
Max_Grinyuk Пользователь Регистрация: 13.05.2009 Сообщений: 36	Hacker19_90? мне кажется интервал тут не при чем.... а то что нужно, там что писать?

11.06.2009, 23:48	#19
Max_Grinyuk Пользователь Регистрация: 13.05.2009 Сообщений: 36	Hacker19_90, ого, а если не секрет, что так много? О_о if (chislo >= 0) and (chislo < 2010) then {то, что нужно} вот я последнее {то, что нужно} не понял. что там написать?