Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Turbo Pascal Исправить код program P4; type school = record nm:integer; name: string; surname: string; god: integer; bukva:set of char= {Множество русских букв:} ; end; https://www.cyberforum.ru/ turbo-pascal/ thread1672294.html В одномерном массиве определить количество соседств двух чисел одного знака и вывести на экран пары этих чисел Turbo Pascal
Задан одномерный массив из 15 целых положительных и отрицательных чисел. Составить программу которая определяет количество соседств двух чисел одного знака и выводит на экран пары этих чисел
Turbo Pascal Найти среди элементов массива два элемента, модуль разности которых имеет наименьшее значение https://www.cyberforum.ru/ turbo-pascal/ thread1671629.html
Дан массив X(215). Найти среди его элементов два элемента, модуль разности которых имеет наименьшее значение
Turbo Pascal Как нарисовать свиток https://www.cyberforum.ru/ turbo-pascal/ thread1671383.html
Помогите
Turbo Pascal Удалить элемент последовательности, наиболее близкий по значению к максимальному в данной последовательности
Задана последовательность А1,......А20), не содержащая одинаковых элементов. 1. Удалить элемент последовательности, наиболее близкий по значению к максимальному в данной последовательности. Под удалением элемента из массива понимать исключении этого элемента путём смещения всех следующих за ним элементов влево на 1 позицию и присвоение последнеиу элементу массива —0. 2. преобразованную...
Turbo Pascal Вывести вторую и предпоследнюю строки файла https://www.cyberforum.ru/ turbo-pascal/ thread1671005.html
Ввести вторую и предпоследнюю строки файла. Если в файле только одна строка, то выводить сообщения нет решения
Turbo Pascal Найти трёхзначные числа, делящиеся нацело на сумму своих цифр While Вывести на экран в строку через пробел такие трёхзначные числа, у которых само число делится на сумму цифр его. https://www.cyberforum.ru/ turbo-pascal/ thread1670914.html Turbo Pascal Из текстового файла записать в файл целых чисел все числа кратные заданному K
Добрый вечер! Помогите написать код на Паскале,.
Turbo Pascal Задана строка S, найти все слова заданной длины и вывести их на экран Помогите решить -написать код на Паскале.Пожалуйста. https://www.cyberforum.ru/ turbo-pascal/ thread1670706.html Turbo Pascal Написать программу выводящую на экран снежинку из символа "*" - Написать программу выводящую на экран снежинку из символа "*" (Через: Procedure/Function) https://www.cyberforum.ru/ turbo-pascal/ thread1670652.html
Определить число всевозможных "маршрутов" мячика с вершины на землю Turbo Pascal
На вершине лесенки, содержащей N ступенек, находится мячик, который начинает прыгать по ним вниз, к основанию. Мячик может прыгнуть на следующую ступеньку, на ступеньку через одну или через 2. (То есть, если мячик лежит на 8-ой ступеньке, то он может переместиться на 5-ую, 6-ую или 7-ую.) Определить число всевозможных "маршрутов" мячика с вершины на землю. Входные данные Вводится одно число 0...
Turbo Pascal Создать иллюзию движения по дороге https://www.cyberforum.ru/ turbo-pascal/ thread1670073.html
Слева от елочек (или справа неважно), должна появиться дорога(непринципиально какая), при этом должна быть иллюзия нашего движения( к примеру мы едем по дороге), а елочки изменяют свою высоту, (в дали маленькие, ближе к нам большие). Огромное спасибо!!!!! Program newyear; uses graph,crt; Var g,m:integer; t,s:pointer; a:arrayof integer; Begin g:=detect;
0 / 0 / 0
Регистрация: 18.11.2015
Сообщений: 60
0

Составить процедуру для создания матрицы А - Turbo Pascal - Ответ 8811094

28.02.2016, 11:16. Показов 1432. Ответов 1
Метки (Все метки)

Author24 — интернет-сервис помощи студентам
Как составить процедуру
Дан массив Х (8). Составить процедуру для создания матрицы А (8,8):
Название: latex.gif
Просмотров: 24

Размер: 1.1 Кб
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
program array1;
uses
  crt;
const
  n=8;
var
  x:array[1..n] of LongInt;
  a:array[1..n,1..n] of LongInt;
  i,j:longint;
begin
  randomize;
  for i:=1 to n do
    begin
      x[i]:=i;
      write(x[i]:4)
    end;
  writeln;
  writeln;
  for j:=1 to n do
    begin
      for i:=1 to n do
        begin
          a[i,j]:=round(exp(j*ln(x[i])));
          write(a[i,j]:9)
        end;
      writeln;
    end;
  readln;
end.


Вернуться к обсуждению:
Составить процедуру для создания матрицы А Turbo Pascal
0
Заказать работу у эксперта
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
28.02.2016, 11:16
Готовые ответы и решения:

Составить процедуру для получения из квадратной матрицы A(n,n), n<=6 матрицы B(n,n-1) путем вычеркивания элементов главной диагонали исходной
Помогите пожалуйста составить процедуру для Паскаля: Составить процедуру для получения из...

Процедура (Составить процедуру для нахождения макс. элемента матрицы)
Помогите написать программку. Задание: Составить процедуру для нахождения макс. элемента...

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

Составить процедуру и функцию для вычисления значений элементов матрицы по заданной формуле
Составить подпрограмму-процедуру и подпрограмму-функцию для вычисления значений элементов а ij...

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

Составить процедуру для вычисления произведения минимальных элементов каждой строки матрицы a(m*n)
Составить процедуру для вычисления произведения минимальных элементов каждой строки матрицы a(m*n)...

Составить процедуру для вычисления суммы положительных элементов каждой строки матрицы
Составить процедуру для вычисления суммы положительных элементов каждой строки матрицы A(m*n)...

Написать процедуру создания типизированного файла из первых строк целочисленной матрицы
Процедура создания файла типизированного из первых строк целочисленный матриц 4-го порядка,...

Подскажите процедуру для создания таблицы умножения
Подскажите пожалуйста процедуру для создания таблицы умножения в VBA,и чтобы msgbox выдавал кол-во...

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