 Паскаль. массивы. |
Прочтите прежде чем задавать вопрос!
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
| aigulia |
  22.04.2010 15:14
Сообщение
#1
|
|
Группа: Пользователи Сообщений: 4 Пол: Женский Репутация:  0   |
Помогите написать программы на Паскале! Сама в этом не разбираюсь, по этому прошу вашей помощи! Заранее спасибо!!
1. Если уравнение ax2 + bx + c = 0 (a не равно 0) имеет вещественные корни, то логической переменной t присвоить значение true, а переменным x1 и x2 – сами корни, иначе же переменной t присвоить false, а значения переменных x1и x2 не менять. 2. Дано 50 вещественных чисел. Найти порядковый номер того из них, которое наиболее близко к какому-нибудь целому числу. 3. Дано натуральное k. Напечатать k-ю цифру последовательности 1234567891011121314…, в которой выписаны подряд все натуральные числа. 4.Даны целые числа x1, x2, …, x55. Вычислить величину x1(x2+x3)(x4+x5+x6)(x7+x8+x9+x10)…( x46+x47+…+x55). |
   |
 
|
Сообщений в этой теме
aigulia Паскаль. массивы. 22.04.2010 15:14
TarasBer > Сама в этом не разбираюсь, по этому прошу ваш... 22.04.2010 15:57 Lapp По 4-й задаче: я б сделал вот так:
p:=1;
for ... 23.04.2010 4:09 Lapp 3-я задача тоже интересная. Я написал, потом стал... 23.04.2010 5:15 Lapp Во 2-й задаче, TarasBer, ты несколько не понял усл... 23.04.2010 8:17 TarasBer > for i:=1 to 50 do if Abs(a-Round(a[i]))<d ... 23.04.2010 10:02 TarasBer Попробовал
for i := 0 to RD do RN := RN div 10;... 23.04.2010 10:24
volvo Задача решалась, причем не одним пользователем на ... 23.04.2010 10:24 Lapp Задача решалась, причем не одним ...
Автор даже э... 23.04.2010 10:55  |
2 чел. читают эту тему (гостей: 2, скрытых пользователей: 0)
Пользователей: 0
|
Текстовая версия | 20.07.2025 6:31 |