Turbo Pascal

Форум программистов и сисадминов Киберфорум

Войти

Регистрация
Восстановить пароль

Другие темы раздела
Turbo Pascal Ввести данные по 5 студентам: f - Ф.И.О., n -год и m - месяц поступления в университет; текущие: g - год и t - месяц. Вывести на экран список студен Ввести данные по 5 студентам: f - Ф.И.О., n -год и m - месяц поступления в университет; текущие: g - год и t - месяц. Вывести на экран список студентов с посчитанным для каждого количеством месяцев учебы и определением курса, на котором студент учится. https://www.cyberforum.ru/ turbo-pascal/ thread903108.html	Ввести матрицу размерностью 5x5, состоящую их целых чисел в промежутке от —100 до +100. В каждой строке поменять местами наибольший и наименьший элеме Turbo Pascal Ввести матрицу размерностью 5x5, состоящую их целых чисел в промежутке от —100 до +100. В каждой строке поменять местами наибольший и наименьший элементы.
Turbo Pascal Расположить элементы каждого столбца матрицы по возрастанию https://www.cyberforum.ru/ turbo-pascal/ thread903105.html Дана матрица размерностью n×m, все элементы матрицы действительные числа, которые определяются пользователем программы. Расположить элементы каждого столбца по возрастанию, полученную матрицу распечатать таким образом, чтобы каждая строка была отдельно. Составить блок-схему!	Turbo Pascal В квадратной матрице поменять местами строку и столбец на пересечение которых находится минимальный элемент https://www.cyberforum.ru/ turbo-pascal/ thread903087.html В квадратной матрицы поменять местами строку и столбец на пересечение которых находится минимальный элемент
Turbo Pascal Вычислить модуль суммы всех элементов массива Помогите пожалуйста. Дан одномерный массив F, состоящий из 10 целых чисел. Вычислить модуль суммы всех элементов массива.	Turbo Pascal Вывести все цифры, числа кратные 3 Дано целое число N. Вывести все цифры, числа кратные 3. Спасибо. https://www.cyberforum.ru/ turbo-pascal/ thread903062.html
Turbo Pascal Дано целое положительное число K. Вычислить и вывести половину суммы всех цифр числа https://www.cyberforum.ru/ turbo-pascal/ thread903051.html Помогите пожалуйста. Дано целое положительное число K. Вычислить и вывести половину суммы всех цифр числа.	Определить есть ли в данном массиве строка, в которой ровно 2 отрицательных элемента Turbo Pascal Дайте пожалуйста готовую программу на турбо паскале Дается двумерный массив размерности n*m заполняемый с клавиатуры. Определить есть ли в данном массиве строка , в котором ровно 2 отрицательных элемента допустим так m -3 -6 -5 -1 n -5 2 -7 3 3 1 6 4
Turbo Pascal Количество точек https://www.cyberforum.ru/ turbo-pascal/ thread903001.html Помогите пожалуйста с задачой. вот условие: Даны n точек координат на плоскости х, y . Подсчитать количество точек, попавших в кольцо с радиусами внутренним r и внешним R, включая точки, лежащие непосредственно на границе.	Turbo Pascal Написать программу, оформив ее в виде функции: удалить из предложения все предлоги Написать программу, оформив ее в виде функции: удалить из предложения все предлоги. Список предлогов задан во втором предложении. Помогите пжл https://www.cyberforum.ru/ turbo-pascal/ thread902966.html
Создать матрицы. Если элемент матрицы на главной диагонали Turbo Pascal Создать матрицы А и В. Если элемент матрицы на главной диагонали > 0, то эту строку рассортировать по возрастанию, обращаясь к процедуре сортировки одномерного массива, иначе определить минимальное в строке с помощью функции и поменять местами числа на главной диагонали с минимальным. Помогите пжл	Turbo Pascal Написать программу, оформив ее в виде функции: с клавиатуры вводится путь к файлу, разбить его на логические части https://www.cyberforum.ru/ turbo-pascal/ thread902963.html Написать программу, оформив ее в виде функции: с клавиатуры вводится путь к файлу, разбить его на логические части и записать в переменную типа запись, которая содержит следующие поля: имя диска, папка (путь), имя файла с расширением, имя файла без расширения, расширение файла. Помогите пжл

ermolay

3451 / 2389 / 2135

Регистрация: 04.12.2011

Сообщений: 3,966

16.06.2013, 09:33

Дана матрица размерностью 3×5. Элементы матрицы определяются случайным случаем в диапазоне -1.1 - Turbo Pascal - Ответ 4727283

16.06.2013, 09:33. Показов 2003. Ответов 2

Метки (Все метки)

Сообщение было отмечено Vlad1kT как решение

Решение

Сообщение от Vlad1kT

Вывести на экран все элементы матрицы в столбец

в один столбец? если да, то так:

Pascal

uses
  crt;
const
  n=3;
  m=5;
var
  a: array[1..n,1..m] of real;
  i,j: integer;
  s: real;
begin
  clrscr;
  s:=0;
  writeln('Ýëåìåíòû ìàòðèöû:');
  for i:=1 to n do
    for j:=1 to m do
    begin
      a[i,j]:=random*2-1;
      writeln(a[i,j]:8:5);
      if a[i,j]>0 then s:=s+a[i,j];
    end;
  writeln('S=',s:8:5);
  readln;
end.

Вернуться к обсуждению:
Дана матрица размерностью 3×5. Элементы матрицы определяются случайным случаем в диапазоне -1.1 Turbo Pascal

Следующий ответ

Programming

Эксперт

94731 / 64177 / 26122

Регистрация: 12.04.2006

Сообщений: 116,782

16.06.2013, 09:33

Готовые ответы и решения:

Дана матрица размерностью 4х5. Элементы матрицы определяются случайным образом в диапазоне -1000.1000
Определить количество положительных и отрицательных чисел, сравнить их, в качестве соответствия...

Элементы матрицы определяются случайным случаем в диапазоне -10.10
Дана квадратная матрица размерностью 5×5. Элементы матрицы определяются случайным случаем в...

Дана квадратная матрица размерностью 4×4. Элементы матрицы определяются пользователем
Дана квадратная матрица размерностью 4×4. Элементы матрицы определяются пользователем. Вывести на...

Дана матрица размера M×N. Вывести ее элементы в следующем порядке:
Дана матрица размера M×N. Вывести ее элементы в следующем порядке: первый столбец сверху вниз,...

	16.06.2013, 09:33

IT_Exp

Эксперт

87844 / 49110 / 22898

Регистрация: 17.06.2006

Сообщений: 92,604

16.06.2013, 09:33

Помогаю со студенческими работами здесь

Создать массив размерностью n×n элементов и заполнить его по образцу, например для матрицы 6×6. С процедурами
Создать массив размерностью n×n элементов и заполнить его по образцу, например для матрицы...

Дана матрица размерностью MxN. Вычислить сумму отрицательных элементов матрицы
Дана матрица размерностью MxN. Вычислить сумму отрицательных элементов матрицы.

Дана матрица А размера m×n. Получить транспонированную матрицу (её размер n×m).
Дана матрица А размера m×n. Получить транспонированную матрицу (её размер n×m).

Дана матрица размера M × N. Продублировать столбец матрицы, содержащий ее минимальный элемент.
Друзья, прошу вас, хелп ми, мне еще около 40 подобных решать, подскажите как это делается......

Наверх