![]() |
Модераторы: Poseidon |
![]() ![]() ![]() |
|
SanneK |
|
|||
Новичок Профиль Группа: Участник Сообщений: 3 Регистрация: 13.5.2006 Репутация: нет Всего: нет |
Помагите пожалуста написать прогу по QBasic
![]() В файле содержатся десятичные числа. Вывевсти их на экран представленые в римской системе исчесления. Зарание благодарен ![]() |
|||
|
||||
Oleg_Ci |
|
|||
![]() Friend ![]() ![]() Профиль Группа: Участник Сообщений: 485 Регистрация: 28.5.2006 Где: Новосиб.обл. Репутация: 25 Всего: 30 |
Вот написал, программа делает следующее:
![]() 1. сначала файл открывает и записывает туда числа 1-18 2. потом снова открывает этот файл, теперь для чтения 3. считывает от туда по одному числу и проверяет его, если больше десяти то записывает в переменную "S$" латинское "Х" - число 10 по нашему, причём если больше 20 то записывает "Х" 2 раза, больше 40 - 4 раза. Помойму в римской системе счисления число 50 это - "L" но его я реализовывать не стал, поэтому если число у нас 200 то в 'S$' записано будет 20 раз "Х" ("ХХХХХХХХХХХХХХХХХХХХ"). Поэтому программа только с маленькими числами работает. 4.Короче потом сам дадумывайся как программа работает. Вот, и ничего сложного. Немного нетак как в задании но похоже очень.
![]() |
|||
|
||||
SanneK |
|
|||
Новичок Профиль Группа: Участник Сообщений: 3 Регистрация: 13.5.2006 Репутация: нет Всего: нет |
СПС
все Okeй ![]() |
|||
|
||||
![]() ![]() ![]() |
Правила форума "Центр помощи" | |
|
ВНИМАНИЕ! Прежде чем создавать темы, или писать сообщения в данный раздел, ознакомьтесь, пожалуйста, с Правилами форума и конкретно этого раздела.
Более подробно с правилами данного раздела Вы можете ознакомится в этой теме. Если Вам помогли и атмосфера форума Вам понравилась, то заходите к нам чаще! С уважением, Poseidon, Rodman |
1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей) | |
0 Пользователей: | |
« Предыдущая тема | Центр помощи | Следующая тема » |
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |