Форум программистов, компьютерный форум, киберфорум
Free Pascal
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Free Pascal Посчитайте, какое минимальное количество камней нужно убрать со стола Помогите пожалуйста решить: На столе в ряд выложены n камней, каждый из которых может быть красного, зеленого или синего цвета. Посчитайте, какое минимальное количество камней нужно убрать со стола, чтобы любые два соседних камня имели разные цвета. Камни в ряду считаются соседними, если между ними нет других камней. Входные данные В первой строке задано целое число n... https://www.cyberforum.ru/ free-pascal/ thread1629014.html Free Pascal Выведите одно число — минимальное необходимое количество монет
Помогите пожалуйста решить: Представьте себе, что у Вас есть брат или сестра-близнец. Это кажется очень необычным, что в мире есть еще один человек, который выглядит также как Вы. И даже трудно сказать хорошо это или плохо, что Вы как будто не один такой на этой планете. А если у Вас и вправду есть близнец, тогда Вы точно знаете, каково это. Теперь представьте себе обычное утро в Вашей семье....
Free Pascal Изменить комнату так, чтобы все n студентов могли жить в ней https://www.cyberforum.ru/ free-pascal/ thread1629011.html
Помогите пожалуйста решить: В связи с началом учебного года во многих общежитиях возникли проблемы с поселением студентов. В одном из таких общежитий есть чудо-комната размером a × b квадратных метров. Комендант хочет поселить в нее ровно n студентов. Но, по закону, на одного жильца должно быть не меньше 6 квадратных метров жилой площади (то есть, комната для n студентов должна иметь площадь не...
Free Pascal Длинная Арифметика. Сложение Считываем в строку a и b, 2 числа, соответственно. Нам нужно посчитать сумму этих двух чисел. Диапазон 0 ≤ a, b ≤ 10^10000 https://www.cyberforum.ru/ free-pascal/ thread1628992.html
Программа не реагирует на нажатие клавиш Free Pascal
Ситуация в том что программа не реагирует на нажатие клавиш, за исключением определенных случаев. 1) если не вызывать ф-цию stPop (либо дважды вызывать перед ней stPush) 2) если превратить ф-ции stPop и stPush в процедуры (вырезав только result:=) 3) если подключить модуль crt, и использовать родной readkey из стандартной библиотеки crt Собственно вопрос в том, в чём может быть дело (и...
Free Pascal В какой из двух последовательностей встречается самое большое, а в какой - самое маленькое число? https://www.cyberforum.ru/ free-pascal/ thread1628793.html
Заданы две числовые последовательности. Формируя случайным образом их размерности и элементы,определить: В какой последовательности встречается самое большое ,а в какой - самое маленькое число;
Free Pascal Организовать снабжение заводов песком так, чтобы затраты были наименьшими (цикл For) https://www.cyberforum.ru/ free-pascal/ thread1628717.html
В населенных пунктах А и В расположены кирпичные заводы, а в пунктах С и D – карьеры, снабжающие их песком. Известны потребности заводов в песке и производительность каждого карьера (потребности не больше производительностей). Требуется организовать снабжение заводов песком так, чтобы затраты были наименьшими, если известна стоимость перевозки тонны песка из каждого карьера до заводов (цикл For)....
Среди чисел заданной строки матрицы найти такое, которое принадлежит наибольшему количеству столбцов Free Pascal
Нужна помощь в переписание подпрограммы, она в данный момент написанна как процедура если я не ошибаюсь, ее над изменить что бы она выполняла следующее----> Среди чисел заданной строки таблицы найти такое, которое принадлежит наибольшему количеству столбцов таблицы uses crt; {$R-} type TElem=single;
Free Pascal Плотно уложить в контейнер длиной L такое подмножество деталей, чтобы оставшийся зазор оказался наименьшим https://www.cyberforum.ru/ free-pascal/ thread1628569.html
Имеется множество деталей K типов, линейные размеры которых равны C1, C2 , .... СK. Требуется плотно уложить в контейнер длиной L такое подмножество деталей, чтобы оставшийся зазор оказался наименьшим.
Free Pascal Исключить из таблицы соревнований данные о неучитываемых результатах Известны результаты выступления спортсменов, принявших участие в соревнованиях по прыжкам в высоту. Каждому из М спорт¬сменов предоставляется К попыток. Согласно правилам соревнований, при подведении итогов не учитывается попытка, давшая наименьший средний результат. Требуется исключить из таблицы данные неучитываемой попытки. https://www.cyberforum.ru/ free-pascal/ thread1628566.html
Free Pascal Определить средний балл группы во каждому экзамену и итогам сессии и указать фамилии неуспевающих и отличников
Через двумерные массивы! Имеется таблица результатов сессии некоторой академической группы. Требуется: определить средний балл группы во каждому экзамену и итогам сессии и указать фамилии неуспевающих студентов и отличников. Если не понятно, есть небольшое объяснение: строка это студенты, столбцы это экзамены, сделать заполнение массива рандомно от 0 до 10. потом подсчитать среднее в...
Free Pascal Оставить в файле сведения только о тех студентах, которые успешно сдали сессию https://www.cyber
8 / 3 / 4
Регистрация: 04.10.2015
Сообщений: 18
02.01.2016, 19:57 0

Если друзья могут пройти все уровни вместе, выведите «I become the guy.» - Free Pascal - Ответ 8573275

02.01.2016, 19:57. Показов 2117. Ответов 8
Метки (Все метки)

Ответ

Цитата Сообщение от Pent Посмотреть сообщение
p:=Random(N + 1); q:=Random(N + 1);
вместо этого попробуй Write('Введите число уровней, которые может пройти LittleX'); Readln(p) и так же с LittleY будет q

Вернуться к обсуждению:
Если друзья могут пройти все уровни вместе, выведите «I become the guy.» Free Pascal
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
02.01.2016, 19:57
Готовые ответы и решения:

Кто-нибудь может пройти все уровни?
Мне тут игрушку подкинули - там 15 уровней. Можете пройти? Я только 4 осилила) ...

Введите три числа. Если они могут быть длинами сторон прямоугольного треугольника, выведите их в порядке возрастания
Введите три числа. Если они могут быть длинами сторон прямоугольного треугольника, выведите их в...

Введите три числа. Если они могут быть длинами сторон тупоугольного треугольника, выведите их в порядке убывания и вычислите площадь
Введите три числа. Если они могут быть длинами сторон тупоугольного треугольника, выведите их в...

Выведите все возможные различные корректные IP-адреса, которые могут быть сложены из заданных кусочков.
Вася решил заняться администрированием компьютерных сетей. Он узнал IP-адресс сервера школьной сети...

8
02.01.2016, 19:57
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
02.01.2016, 19:57
Помогаю со студенческими работами здесь

Выведите все числа от A до B включительно, в порядке возрастания, если A < B
2. Даны два целых числа A и В (каждое в отдельной строке). Выведите все числа от A до B...

Как отфильтровать сводную таблицу, если все критерии могут не существовать?
Есть код фильтра: With ActiveSheet.PivotTables(&quot;Сводная1&quot;).PivotFields(&quot;Отклонения&quot;)...

Как создать обычный файл exe, который могут открывать друзья.
Всем доброе утро! Вопрос о том как сделать программу, которая запускалась бы одним файлом .exe....

Проверить, могут ли все заданные точки лежать на одной окружности и, если да, найти её радиус
Помогите, пожалуйста. Задан размер массива действительных чисел и значения его элементов. Считая,...

Сколькими способами они могут занять места, если все пять пар сидят подряд?
2. Сколькими способами они могут занять места, если все пять пар сидят подряд?

Могут ли DDR2 и DDR3 работать вместе?
Привет всем! Есть вот такая материнская плата:...

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru