Четверг, 28.03.2024, 16:45
Задачи по информатике
Главная | Регистрация | Вход Приветствую Вас Гость | RSS
[ Новые сообщения · Участники · Правила форума · Поиск · RSS ]
Модератор форума: ignorer, KOT_B_MEIIIKE, PASCAL26, atvrider  
Форум » Решение задач по информатике » Задачи по программированию + блок-схемы » Задачи в Паскале
Задачи в Паскале
1.*[ 135 ][85.99%]
2.-[ 22 ][14.01%]
Всего ответов: 157
nic-nicДата: Воскресенье, 27.12.2009, 09:29 | Сообщение # 406
Рядовой
Группа: Новичок
Сообщений: 1
[ 0 ]
Статус: Offline
Помогите пожалуста решить такую задачку на Паскале
N учасников олимпиады получили уникальные номера от 1 до N. В результате решени задания на олимпиаде каждый учасник получил определённое количество балов ( целое число ото 0 до 600) Известно кто сколько балов получил. Необходимо перечислить учасников олимпиады в порядке неувеличения полученых ими балов.
Заранее всем очень благодарен!!!!
 
kirilkaДата: Воскресенье, 27.12.2009, 20:57 | Сообщение # 407
Лейтенант
Группа: Участник
Сообщений: 12
[ 0 ]
Статус: Offline
Могу решить быстро и недорого!!! Вот группа в контакте http://vkontakte.ru/club13454523
По всем вопросом писать на ящик kirilka2008ko@mail.ru
 
404NotFoundДата: Понедельник, 28.12.2009, 16:25 | Сообщение # 408
Рядовой
Группа: Новичок
Сообщений: 4
[ 0 ]
Статус: Offline
zadachki, помогите решить задачу на 28 странице!!!!!!ПППЛЛЛЛЛИИИИИИИЗЗЗЗЗЗЗ!!!!!!!!!!! smile
 
ignorerДата: Среда, 30.12.2009, 16:01 | Сообщение # 409
Генералиссимус
Группа: Модераторы
Сообщений: 602
[ 18 ]
Статус: Offline
Приветствую всех. кто-нить знает как решить задачу: написать все перестановки n чисел. я скока не пробовал у мну не получилось. если может кто решить напишите код если мона или алгоритм хотяб. заранее спасибо!
 
krevetkaДата: Четверг, 31.12.2009, 15:36 | Сообщение # 410
Лейтенант
Группа: Новичок
Сообщений: 12
[ 0 ]
Статус: Offline
решите пожалуйста на паскале задачку..
Написать программу вычисления среднеарифметического только отрицательных чисел среди произвольных вводимых чисел с окончанием по вводу признака конца
 
ignorerДата: Воскресенье, 03.01.2010, 22:58 | Сообщение # 411
Генералиссимус
Группа: Модераторы
Сообщений: 602
[ 18 ]
Статус: Offline
krevetka,
var m : array [1..100] of integer;
i, a, n : integer;
x : real;
begin
repeat
readln(a);
if (not(<признак конца>))and(a<0)then begin inc(i); m[i]:=a; end;
until <признак конца>;
n:=i; a:=0;
for i:=1 to n do a:=a+m[i];
x:=a/n;
write(x);
end.

Добавлено (03.01.2010, 22:58)
---------------------------------------------

Quote (ignorer)
Приветствую всех. кто-нить знает как решить задачу: написать все перестановки n чисел. я скока не пробовал у мну не получилось. если может кто решить напишите код если мона или алгоритм хотяб. заранее спасибо!

всем ещё раз спасибо нашёл в инете решение.
 
YuliaFДата: Понедельник, 04.01.2010, 11:09 | Сообщение # 412
Лейтенант
Группа: Участник
Сообщений: 11
[ 0 ]
Статус: Offline
помогите пожалуйста, вот задача:
1.Даны натуральное число k и одновременно не равные нулю целые числа n1, ... , nk. Найти НОД (\n1\, ... , \nk\) и целые u1,...,uk такие что, u1*n1+...+uk*nk=НОД (\n1\, ... , \nk\)
P.S.\n1\ это модуль числа n1.

2. Дано натуральное число р. Получить последовательность а0,...,аn, каждый член которой равен -1, 0 или 1, такую, что p=an*{3 В СТЕПЕНИ N}+…+a1*3+a0 (an<>0).

Всем огромное спасибо!!!

Вот в 1 задаче, как найти нод я почти знаю, а вот дальше как решить ?? А 2 задачу, я даже математическую модельь сложить не могу.
Всем за ранее огромное спасибо!!

 
ignorerДата: Понедельник, 04.01.2010, 15:11 | Сообщение # 413
Генералиссимус
Группа: Модераторы
Сообщений: 602
[ 18 ]
Статус: Offline
YuliaF,
Quote (YuliaF)
целые u1,...,uk такие что, u1*n1+...+uk*nk=НОД (\n1\, ... , \nk\)

есть ли ещё какие-то ограничения значения переменных u1,...,uk в первой задачке кроме того, что они целые?
короче могут ли они быть равны 0? последовательность n1,...,nk задаётся с клавиатуры, берётся из файла или создаётся случайным образом?
Quote (YuliaF)
Получить последовательность а0,...,аn

n насколько я понимаю не задаётся с клавиатуры, а нужно искать самому?


Сообщение отредактировал ignorer - Понедельник, 04.01.2010, 15:15
 
WalteR309Дата: Вторник, 05.01.2010, 19:47 | Сообщение # 414
Рядовой
Группа: Новичок
Сообщений: 1
[ 0 ]
Статус: Offline
помогите решить три задачи:
1.
Даны два стека. В обоих стеках находяться натуральные числа.
Найти сумму чисел в обоих стеках и восстановить их в прежнем виде
(третьего стека не использовать).

2.
Даны четыре очереди. Две первых очереди пустые, а в двух других
находяться натуральные числа, причем, количество чисел в них одно и тоже.
С помощью первых очередей найти сумму всех произведений чисел
последовательно взятых по одному из третьей и четвертой очереди и восстановить их в прежнем виде.

3.
10cosx-0,1x^2=0 эту нужно решить по типу модулей...

я вообще в паскале не шарю sad и 3 я даже не представляю что такое модули и как решаются... sad

 
BarracudaДата: Вторник, 05.01.2010, 22:43 | Сообщение # 415
Рядовой
Группа: Новичок
Сообщений: 1
[ 0 ]
Статус: Offline
Решите пожалуйста задачку, а то времени очень мало: на Подпрограммы
Упорядочте строки матрицы по возрастанию их величин.

p.s И если не сложно опишите суть условия, а то мне не очень понятно((
Может быть не строки матрицы, а числа? И как это всё реализовать в подпрограмме?

Сообщение отредактировал Barracuda - Суббота, 09.01.2010, 12:13
 
SelkupДата: Четверг, 07.01.2010, 16:24 | Сообщение # 416
Рядовой
Группа: Новичок
Сообщений: 1
[ 0 ]
Статус: Offline
Здравствуйте!
Помогите пожалуйста решить задачу:
Две геометрические фигуры вырезаны из бумаги: отрезок длиной L и равнобедренный треугольник со сторонами B, C и C (данные вещественные). Описать функцию, аргументами которой являются размеры фигур, а результатом будет TRUE, если одной фигурой можно полностью закрыть другую, и FALSE в противном случае.
Спасибо!
 
kirilkaДата: Четверг, 07.01.2010, 18:04 | Сообщение # 417
Лейтенант
Группа: Участник
Сообщений: 12
[ 0 ]
Статус: Offline
Решаю задачи на языке Pascal!!! Вот группа в контакте http://vkontakte.ru/club13454523
По всем вопросом писать на ящик kirilka2008ko@mail.ru
 
404NotFoundДата: Пятница, 08.01.2010, 20:49 | Сообщение # 418
Рядовой
Группа: Новичок
Сообщений: 4
[ 0 ]
Статус: Offline
Элементы матрицы В (1:п,1:т), отвечающие условию Ь,... >10, записать в массив С (1:пт).
ПАМАГИТЕ ПЛИИИИЗЗЗЗЗЗЗ!!!!!!!!! СРОЧНА НАДА!!!!!!!!!!!! ЗАРАНЕЕ СПАСИБО!!=) biggrin
 
YuliaFДата: Пятница, 08.01.2010, 23:35 | Сообщение # 419
Лейтенант
Группа: Участник
Сообщений: 11
[ 0 ]
Статус: Offline

YuliaF,
Quote (YuliaF)
целые u1,...,uk такие что, u1*n1+...+uk*nk=НОД (\n1\, ... , \nk\)

есть ли ещё какие-то ограничения значения переменных u1,...,uk в первой задачке кроме того, что они целые?
короче могут ли они быть равны 0? последовательность n1,...,nk задаётся с клавиатуры, берётся из файла или создаётся случайным образом?

когда u1,...,uk равны 0, то нужно рассмотреть отдельный случай. последовательность n1,...,nk задаётся с клавиатуры

Quote

Получить последовательность а0,...,аn

n насколько я понимаю не задаётся с клавиатуры, а нужно искать самому?

да, n нужно искать самому.
Огромное спасибо, за ранее!!!

 
ignorerДата: Суббота, 09.01.2010, 11:53 | Сообщение # 420
Генералиссимус
Группа: Модераторы
Сообщений: 602
[ 18 ]
Статус: Offline
YuliaF, ок, завтра как тока решу, сразу напишу решение первой задачи, а вторую незнаю решу или нет, но попытаюсь, думаю получится

Добавлено (09.01.2010, 00:00)
---------------------------------------------

Quote (YuliaF)
когда u1,...,uk равны 0, то нужно рассмотреть отдельный случай.

просто есть куча вариантов чему может быть равен каждый u, но я как прийти только к одному: u[1],..,u[k-1]=0,
а u[k] просто подогнать под ответ, над 2 способом щас думаю

Добавлено (09.01.2010, 11:49)
---------------------------------------------
YuliaF, 2 задачу почти решил, там остались тока формальности, а 1 догадываюсь как решить, но пока не написал.

Добавлено (09.01.2010, 11:53)
---------------------------------------------
вечером оба решения выложу сразу

Сообщение отредактировал ignorer - Суббота, 09.01.2010, 14:36
 
Форум » Решение задач по информатике » Задачи по программированию + блок-схемы » Задачи в Паскале
Поиск:

Copyright MyCorp © 2024