| ← Январь 2003 → | ||||||
|
2
|
4
|
|||||
|---|---|---|---|---|---|---|
|
6
|
9
|
11
|
12
|
|||
|
13
|
14
|
15
|
16
|
17
|
18
|
19
|
|
21
|
23
|
25
|
26
|
|||
|
31
|
||||||
За последние 60 дней ни разу не выходила
Сайт рассылки:
http://prog.rusfaq.ru/pascal
Открыта:
14-03-2002
Статистика
0 за неделю
RusFAQ.ru: Программирование на языке Pascal
| Информационный Канал Subscribe.Ru |
RusFAQ.ru: Программирование на языке Pascal
Выпуск № 086
от 24.01.2003, 08:10
| Администратор: Имя: Sensey URL: Информационный ресурс ICQ: 105679124 Украина, Харьков |
О рассылке: Задано вопросов: 144 Отправлено ответов: 437 Активность: 303.4 %
|
| Список экспертов, ответы которых опубликованы в данном выпуске |
| Ayl Статус: Профессиональный Общий рейтинг: 117.74 [Подробней >>] |
Tancho Статус: Доверительный Общий рейтинг: 136.7 [Подробней >>] |
Byter Статус: Опытный Общий рейтинг: 125.09 [Подробней >>] |
| OVA Статус: Начальный Общий рейтинг: 107.31 [Подробней >>] |
kvINT Статус: Профессиональный Общий рейтинг: 105.89 Телефон: (34316)2-31-45 [Подробней >>] |
Igoryk Статус: Опытный Общий рейтинг: 141.39 URL: IgorykSoft [Подробней >>] |
| Ace Статус: Доверительный Общий рейтинг: 141.66 [Подробней >>] |
| Краткий перечень вопросов |
Вопрос № 143. привет всем как,написать,прогу,чтобы,45(было 4+5=9 ) можа,взять,новые,переменные(i.j )... (ответов: 7)
Вопросов: 1, ответов: 7
| Вопрос № 143 |
привет всем
как,написать,прогу,чтобы,45(было 4+5=9 )
можа,взять,новые,переменные(i.j )
Вопрос отправлен: 21.01.2003, 08:00
Отправитель: .hf (_hf@tut.by)
[Следующий вопрос >>] [Список вопросов]
Отвечает Ayl
Здравствуйте, .hf!
Как? С использованием драйверов hands.sys и head.vxd
Ты бы хоть задание написал нормально.
Предлагаю алгоритм:
1. Ввести целое число n
2. Проверить его на допустимость (9 < n < 100)
3. Если недопустимо - повторить ввод (перейти к п.1)
4. Выделить цифры числа: i = n div 10; j = n mod 10
5. Сложить i и j и вывести результат
Все. Можно еще зациклить до ввода, скажем, 0.
Ответ отправлен: 21.01.2003, 14:15
Отправитель: Ayl
Отвечает Tancho
Здравствуйте, .hf!
Если я правильно понял твой вопрос то
надо вводить двухзначное число, а оно интерпретироваться
как суму своих двух цифр, 45 было 4+5=9,
56 было 5+6=11, 89 было 8+9=17 и т.д.
Если так, то смотри приложению оно работает под
Borland Pascal for Windows & Turbo Pascal for Windows и
для выхода надо ввести 0.
Приложение:
Ответ отправлен: 21.01.2003, 11:35
Отправитель: Tancho
Отвечает Byter
Добрый день, .Разлогай в цикле с помощью div и mod.
...
c:=45;
sum:=(c div 10)+(c mod 10);
...
Так можно любое число разложить(в цикле).
Вроде писал я это,а найти не могу!
Ответ отправлен: 21.01.2003, 15:32
Отправитель: Byter
Отвечает OVA
Доброе время суток, .hf!
вообщем если тебе надо вычислить сумму i и j то введи какуюнибудь еще одну переменную числового типа
(н.п. sum:integer), а потом в самой программе (т.е. гденибудь между begin и end) напиши sum:=i+j;
и в sum будут храниться сумма переменных i и j.
Если 45 у тебя в строке, то смотри текст программы:
var
s,s1:string;
i,j,code,sum:integer;
begin
s:='45'; (можешь взять дрегие числа)
sum:=0;
for i:=1 to length(s) do
begin
s1:=s[i];
val(s1,j,code);
sum:=sum+j;
end;
writeln(j);
end.
пояснения:
val переделывает из string в integer, переменная code нужна для того, чтобы если ты укажкжшь не те перменные, например не string и integer,а integer и integer то в code останется номер ошибки.
length возвращает число - количество символов в переменной, указанной в скобках.
Ответ отправлен: 21.01.2003, 16:48
Отправитель: OVA
Отвечает kvINT
Доброе время суток, .hf!
Делишь 45 на 10 нацело. Складываешь результат и остаток.
Операции div и mod.
Ответ отправлен: 21.01.2003, 19:06
Отправитель: kvINT
Отвечает Igoryk
Приветствую Вас, .hf!
По-подробнее опиши проблему.
Ответ отправлен: 21.01.2003, 21:17
Отправитель: Igoryk
Отвечает Ace
Здравствуйте, .hf!
Сделай так: преобразуй с помощью Str число в строку, разбей его на две цифры, преобразую каждую в отдельности в число(Val) и сложи.
Ответ отправлен: 21.01.2003, 22:58
Отправитель: Ace
|
Форма отправки вопроса |
Форма может работать некорректно в почтовых программах "Microsoft Outlook" и "Microsoft Outlook Express". В программе The Bat! подобные формы не работают вообще!
После нажатия на кнопку "Отправить", будет открыто второе окно. Заметьте, что в некоторых браузерах могут стоять запреты на открытие других окон, а также "чрезмерное" кэширование данных, при этом факт отправки Вашего вопроса стоит под сомнением.
Мы рекомендуем открывать рассылку в программе Internet Explorer 5.0+ или отправлять вопросы с сайта по адресу: http://rusfaq.ru/cgi-bin/Message.cgi.
© 2002 Команда RusFAQ.ru.
| Вопрос и дополнение |
Ваш вопрос:
Приложение (если необходимо):
Получить ответов:
| Выбор рассылки |
| Программисту Assembler (38) C / C++ (30) Perl (5) Delphi (18) Pascal (22) Basic / VBA (12) Java / JavaScript (10) PHP (6) MySQL / MSSQL (5) |
Пользователю Windows 95/98/Me (36) Windows NT/2000/XP (30) "Железо" (35) Поиск информации (19) |
Администратору Windows NT/2000/XP (13) Linux / Unix (14) |
Юристу Гражданское право (10) Семейное право (6) Трудовое право (5) КоАП (3) |
Отправить вопрос всем экспертам выбранной рассылки.
| © 2002 Россия, Москва. Авторское право: RusFAQ.ru |
| http://subscribe.ru/
E-mail: ask@subscribe.ru |
Отписаться
Убрать рекламу |
| В избранное | ||
