|
|
| Другие темы раздела | |
|
Turbo Pascal Вычислить значение выражения и определить его тип
https://www.cyberforum.ru/ turbo-pascal/ thread659557.html Вычислить значение выражения и определить его тип: k Mod 7 = k Div 5 - 1, при k=15 ; |
Turbo Pascal Если x, y отрицательны, то каждое значение заменить его модулем помогите не могу написать код... напишите программу пожалуйста... Даны действительные числа x, y. Если x, y отрицательны, то каждое значение заменить его модулем; если отрицательное только одно из них, то оба значения увеличить на 0.5; если оба значения не отрицательны и ни одно из них не принадлежит отрезку , то оба значения уменьшить в 10 раз; в остальных случаях x, y оставить без изменения. |
| Turbo Pascal Вычисления корня в столбик Надо написать код для pascal, вычисляющий квадратный корень из чисел до 10^500, если число не является точным квадратом выводить -1 (алгоритм вычесления корня в столбик) https://www.cyberforum.ru/ turbo-pascal/ thread659544.html |
Turbo Pascal Отсортировать список в порядке убывания номеров телефонов, используя метод вставок
https://www.cyberforum.ru/ turbo-pascal/ thread659497.html :cry:Задание: Дан список владельцев телефонов (10 человек) в виде ФАМИЛИЯ ТЕЛЕФОН 15 симв. 9 симв. Данные в одной строке отделяются друг от друга пробелами. Отсортировать этот список в порядке убывания номеров телефонов , используя метод вставок Решение: Program pr1; type t=array of char; |
|
Turbo Pascal Пощадь поверхности и обьем шара Пожалуйста пмогите пощадь поверхности шара и обьем шара найти. программу в турбо паскале.... |
Turbo Pascal Разветвления: вычислить значение составной функции
https://www.cyberforum.ru/ turbo-pascal/ thread659443.html Помогите пожалуйста! Нужно сделать задачку. у=х*х+7*х-9 когда х>0 y= x*x-2 когда -2<x<=0 y=x*x*x-2*x когда x<=-2, не знаю как записать, но могу сделать такую у=х*х+7*х-9 когда х>0 y= x*x-2 когда x<=0 |
| Turbo Pascal Преобразовать целое число в зависимости от остатка Пусть необходимо преобразовать целое число N в зависимости от величины остатка от его деления на 17 следующим образом: если N mod 17 = 0, то N := 0; если N mod 17 = 1 или 6, то N := -N; если N mod 17 = 2, 3 или 5, то N := 2xN; если N mod 17 = 4, то N := ЗхN; во всех прочих случаях N :=* 5xN. https://www.cyberforum.ru/ turbo-pascal/ thread659398.html |
Turbo Pascal вычислить знач Методические указания: все варианты задания выполняются каждым студентом, без написания программы с оформлением ответов в тетради. I. Вычислить значения выражений и определить их тип: 1. Trunc(6.9); 2. Round(6.9); 3. 20 Div 6; 4. 20 Mod 6; 5. 3*7 Div 2 Mod 7/3 - Trunc(Sin(1)); 6. Sqr(x)+Sqr(y)<=4, при x=0.3, y=-1.6 ; |
|
Turbo Pascal В каком случае программист задает вечный цикл?
https://www.cyberforum.ru/ turbo-pascal/ thread659297.html В каком случае программист задает вечный цикл? |
Turbo Pascal разветвляющийся алгоритм Написать программу на языке Pascal для реализации разветвляющегося алгоритма https://www.cyberforum.ru/ turbo-pascal/ thread659296.html |
|
Выяснить, принадлежит ли точка с координатами (x, y) заштрихованной части плоскости Turbo Pascal Даны переменные x, y. Выяснить, принадлежит ли точка с координатами (x, y) заштрихованной части плоскости http://pics.kz/i1/64/f4/64f40abc5f5167feb0427d4db66173f7.png |
Turbo Pascal Записи: имеются ли два пассажира, багажи которых совпадают по числу вещей и по весу доброго времени суток помогите пожалуйста с задачей Тема: Записи. Работа с текстовыми файлами Дан файл f, содержащий сведения о багаже нескольких пассажиров. Багаж пассажира характеризуется количеством вещей и общим весом вещей. Сведения о багаже каждого пассажира представляют собой запись с двумя полями: одно поле целого типа (количество вещей) и одно - действительное (вес в килограммах).... https://www.cyberforum.ru/ turbo-pascal/ thread659198.html |
|
Фрилансер
|
|
| 28.09.2012, 13:25 | 0 |
Найти произведение ненулевых элементов каждого столбца массива, ответы вывести с указанием номера столбца - Turbo Pascal - Ответ 349700828.09.2012, 13:25. Показов 3286. Ответов 4
Метки (Все метки)
Ответ
1) Заполняешь каким либо образом матрицу
2) Потом делаешь произведение первого столбца max и выводишь это произведение с указанием индекса 3) В цикле приходишься по столбцам и находишь произведение не ненулевых элементов сравниваешь полученное произведение с max произведение и если это произведение больше max то в max заносишь это произведение 4) Выводишь полученное произведение на шаге 3 с указанием индекса столбца Ну ещё запоминаешь индекс max столбца чтобы его вывести потом Вернуться к обсуждению: Найти произведение ненулевых элементов каждого столбца массива, ответы вывести с указанием номера столбца Turbo Pascal
1
|
|
| 28.09.2012, 13:25 | |
|
Готовые ответы и решения:
4
Блок-схема. произведение ненулевых элементов каждого столбца матрицы В(5,12). Полученные значения вывести, указав номера столбцов Найти произведение ненулевых элементов каждого столбца массива
|
| 28.09.2012, 13:25 | |
| 28.09.2012, 13:25 | |
|
Помогаю со студенческими работами здесь
0
Найти произведение ненулевых элементов каждого столбца матрицы Для каждого столбца массива A 3×5 рассчитать произведение ненулевых элементов для каждого столбца двухмерного массива 3 × 5 рассчитать произведение ненулевых элементов |