|
|
Другие темы раздела | |
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). Полученные значения вывести, указав номера столбцов Найти произведение ненулевых элементов каждого столбца массива Разработать алгоритм, определяющий произведение ненулевых элементов каждого столбца матрицы В(5,12). Полученные значения вывести, указав номера столбц |
28.09.2012, 13:25 | |
28.09.2012, 13:25 | |
Помогаю со студенческими работами здесь
0
Найти произведение ненулевых элементов каждого столбца матрицы Найти произведение ненулевых элементов каждого столбца матрицы Для каждого столбца массива A 3×5 рассчитать произведение ненулевых элементов для каждого столбца двухмерного массива 3 × 5 рассчитать произведение ненулевых элементов |