|
|
Другие темы раздела | |
Pascal Определить количество дней, в которых оценки меньше средней оценки по классу
https://www.cyberforum.ru/ pascal/ thread87355.html в массиве записаны оценки по информатике 22 учеников класса. Определить количество дней, в которых меньше средней оценки по классу, и вывести номера элементов массива, соответствующих таким ученикам. |
Pascal что нужно добавить? Всем доброго времени суток. Завтра сдавать практику а одна прога не доконца фурычит Сама задача! В магазин доставили товар 1)из какой страны доставили самый дорогой,дешёвый товар . 2)Какой товар и из какой страны поступил в наибольшем колличестве-вот задача ВТорое не выходить помогите кому не сложно буду очень признателен. программа program Proga; uses crt; |
Pascal Подсчет степени Доброго всем утра. В общем сложилась небольшая проблема. Вычисление такой вот степени (1+х)^3/5 при условии x<=0. Как видите, через exp нельзя. Каким еще способом можно ее подсчитать? https://www.cyberforum.ru/ pascal/ thread87344.html |
Pascal Определить количество элементов больших суммы всех элементов и написать их номера.
https://www.cyberforum.ru/ pascal/ thread87343.html Дан массив. Определить количество элементов больших суммы всех элементов и написать их номера. |
Pascal множества. Программа работает неправильно uses crt; type mn=set of char; var a,b,c:mn; x,y,z:char; procedure enter(var a,b,c:mn); begin a:=; b:=; c:=; writeln('Vvedite element mnojestva A(1 symvol):'); |
Pascal Рекурсия: вычисление числа сочетаний
https://www.cyberforum.ru/ pascal/ thread87335.html помогите довести до ума рекурсию нужно для сокращения числа итераций учесть свойство симетрии c(n,r)=c(n, n-r) program fPaskal; var r,n:integer; function c(r,n:integer):integer; begin if (r=0) or (r=n) then c:=1 else c:=c(n-1,r)+c(n-1,r-1); end; |
Pascal Из числа n удалить все четные цифры Из заданного натурального числа n удалить все четные цифры Использовать подпрограммы функции и процедуры, занесенные в модули(( При использовании вектора, он передается в процедуру в виде открытого массива(( https://www.cyberforum.ru/ pascal/ thread87334.html |
Перевернуть число Pascal Перевернуть заданное натуральное число n и сложить с исходным. Использовать подпрограммы функции и процедуры, занесенные в модули(( При использовании вектора, он передается в процедуру в виде открытого массива(( |
Pascal все цифры заданного натурального числа n по возрастанию Поставить все цифры заданного натурального числа n по возрастанию Использовать подпрограммы функции и процедуры, занесенные в модули(( При использовании вектора, он передается в процедуру в виде открытого массива(( https://www.cyberforum.ru/ pascal/ thread87332.html |
Pascal вычислить
https://www.cyberforum.ru/ pascal/ thread87331.html Вычислить: S =((…(n2 – (n – 1)2 )2 – (n – 2)2 )2 – (n – 3)2 )2 ) - …- 22 )2 – 12 )2 Использовать подпрограммы функции и процедуры, занесенные в модули(( При использовании вектора, он передается в процедуру в виде открытого массива(( |
Определить максимальную и минимальную цифру заданного натурального числа k Pascal Определить максимальную и минимальную цифру заданного натурального числа k (все цифры в числе различные). Использовать подпрограммы функции и процедуры, занесенные в модули(( При использовании вектора, он передается в процедуру в виде открытого массива(( |
Pascal Сколько раз в заданном натуральном числе n встречается заданная цифра k? Определить, сколько раз в заданном натуральном числе n встречается заданная цифра k. Использовать подпрограммы функции и процедуры, занесенные в модули(( При использовании вектора, он передается в процедуру в виде открытого массива(( https://www.cyberforum.ru/ pascal/ thread87328.html |
4117 / 999 / 191
Регистрация: 09.04.2009
Сообщений: 4,223
|
||||||
19.01.2010, 12:06 | 0 | |||||
Получить массив Y(N) такой, что в нем сначала идут положительные числа, затем отрицательные из X. - Pascal - Ответ 48895819.01.2010, 12:06. Показов 1755. Ответов 7
Метки (Все метки)
Сообщение было отмечено как решение
РешениеНе по теме: Puporev, да нет проблем Ivankooo, и больше не мультитопте...
Вернуться к обсуждению: Получить массив Y(N) такой, что в нем сначала идут положительные числа, затем отрицательные из X. Pascal
3
|
19.01.2010, 12:06 | |
Готовые ответы и решения:
7
Получить из массива новый в котором сначала идут положительные числа, затем нули и потом отрицательные Получить новый массив, где сначала идут положительные числа, затем нулевые, затем отрицательные Получить массив А, в которой сначала идут положительные элементы, а затем отрицательные Получить новый массив, в котором сначала идут положительные числа, затем нулевые, затем отрицательные исходного |
19.01.2010, 12:06 | |
19.01.2010, 12:06 | |
Помогаю со студенческими работами здесь
0
Получить массив, в котором сначала идут положительные элементы, а затем отрицательные Сформировать новый массив в котором идут сначала отрицательные элементы, затем нули, затем положительные Получить массив, в котором вначале идут положительные элементы, а затем отрицательные Записать массив, сначала все отрицательные числа и нули затем положительные Получить новый массив, в котором сначала расположены отрицательные, а затем положительные элементы исходного Записать в исходный массив сначала положительные числа и отрицательные, а затем нули, сохраняя порядок |