|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
08.07.2011, 18:28 | #1 |
Форумчанин
Регистрация: 08.06.2011
Сообщений: 693
|
Генерация варинта - ошибка
Захотел сделать такую программу. В компьютер вводится число.
Если оно более 10 по размеру, то выводится ошибка. Если оно=<0, то выводится Ошибка. Далее - число записывается в файл и считывается в ячейки типа String[1]. Если среди них, есть не цифра, то пишется ошибка. Итак, ошибок нет, уменьшаем число на 1 и генерируем и выводим на экран число+1. У меня всегда ошибка. Кому удобнее скачать файл, прикладываю. Код:
Последний раз редактировалось hon; 08.07.2011 в 18:37. |
08.07.2011, 21:03 | #2 |
Пользователь
Регистрация: 14.04.2011
Сообщений: 60
|
Код:
а еще не совсем понятно, что сие чудо должно делать в принципе, можно условие не своими словами, а как там, откуда оно взято? |
13.07.2011, 13:31 | #3 | |
Форумчанин
Регистрация: 08.06.2011
Сообщений: 693
|
Цитата:
|
|
14.07.2011, 10:50 | #4 |
Пользователь
Регистрация: 14.04.2011
Сообщений: 60
|
вот эта строчка
Код:
и вы таки можете пояснить условие задачи?) |
14.07.2011, 16:50 | #5 | ||
Форумчанин
Регистрация: 08.06.2011
Сообщений: 693
|
Цитата:
Цитата:
Вы открываете программу, пишете количество вариантов (3). Программа читает число. Если оно>10 (макс. длина Longint), то пишется "Слишком большое число". Число записывается в файл. Далее — если число содержит не цифру, то пишется "Это не число". И если число<=0, то пишется ошибка. |
||
14.07.2011, 17:23 | #6 |
Пользователь
Регистрация: 14.04.2011
Сообщений: 60
|
Код:
|
15.07.2011, 20:03 | #7 | |
Форумчанин
Регистрация: 08.06.2011
Сообщений: 693
|
Цитата:
|
|
15.07.2011, 20:27 | #8 |
Пользователь
Регистрация: 14.04.2011
Сообщений: 60
|
компилятор PascalABC, это полный текст
сам лично проверил, все как вы хотели, и две буквы и десять и на любом языке) |
16.07.2011, 13:43 | #9 |
Форумчанин
Регистрация: 08.06.2011
Сообщений: 693
|
спасибо
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Генерация перестановок | vereney | Паскаль, Turbo Pascal, PascalABC.NET | 3 | 21.03.2011 21:04 |
генерация чисел | nXs | Общие вопросы Delphi | 2 | 13.08.2010 11:39 |
Генерация массива | ZORRO2005 | Microsoft Office Excel | 2 | 23.05.2010 23:47 |
Генерация имен | Napste® | PHP | 8 | 07.05.2010 20:33 |
Генерация звука | N!ckeL | Общие вопросы Delphi | 1 | 19.06.2008 09:19 |