С Новым годом! Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
Pascal ABC В двухзначном числе вывести минимальное из цифр, входящих в число А двухзначное число вывести минимальное из цифр входящие число https://www.cyberforum.ru/ pascalabc/ thread2182638.html Реализовать в виде модуля набор подпрограммм Pascal ABC
Реализовать в виде модуля набор подпрограмм для выполнения над обыкновенными дробями вида P/Q (где Р − целое число, Q − натуральное число) следующих операций: сло¬жения, вычитания, умножения, деления, сокращения, возведе¬ния в степень N (где N − натуральное число), а также функций, реализующих операции отношения (равно, не равно, больше или равно, меньше или равно, больше, меньше). При...
Pascal ABC Ветвление алгоритма https://www.cyberforum.ru/ pascalabc/ thread2182537.html
Строго не судите,уровень моих познаний в программировании школьный. Есть проблема,помогите пожалуйста разобраться! Есть 4 самостоятельных алгоритма (сложение матриц,умножение матриц,нахождение определителя и нахождение обратной матрицы) их нужно объединить в один алгоритм с правом выбора с клавы примерно так: program PPP; uses crt; var c: real; begin write('Здравствуйте! Какое...
Pascal ABC Определить, в каком слове строки больше заданных букв: в первом или последнем https://www.cyberforum.ru/ pascalabc/ thread2182523.html
дан текст определить в каком слове больше заданных букв в первом или последнем.
Определить слова состоящие только из одних цифр Pascal ABC
дана символьная строка, содержащая слова разделенные между собой одним или несколькими пробелами. определить слова состоящие только из одних цифр. представьте эти слова в виде чисел и найдите их среднее арифметическое
Pascal ABC Задачи по строкам 1) дана строка символов, преобразовать её, удалив все последовательности символов "аб", вставить вместо пробелов двоеточие и определить если в ней хотя бы одна цифра. 2) Дана символьная строка содержащая цифры от 0 до 9, объединенные в слова, разделенные между собой одним или несколькими пробелами. рассматривая слова как числа определить самое маленькое число. https://www.cyberforum.ru/ pascalabc/ thread2182486.html
Pascal ABC Сколько человек может говорить только по-французски и сколько может говорить на английском и французском языках? https://www.cyberforum.ru/ pascalabc/ thread2182331.html
В группе из 100 человек 72 человека могут говорить по-английски, а 43 могут говорить по-французски. Сколько может говорить только по-английски? Сколько человек может говорить только по-французски и сколько может говорить на английском и французском языках?
Разложение в ряд Pascal ABC
Вид функции: sh x (гиперболическая функция) Разложение в ряд: x+\frac{{x}^{3}}{3!}+\frac{{x}^{5}}{5!} + ... + \frac{{x}^{2n+1}}{(2n+1)!} + ... Пределы изменения аргумента : |x|<∞
Pascal ABC Исправить ошибки Добрый день. Помогите исправить ошибки в задачах. Спасибо). program exp2; const m=5; n=3; type matr = array of integer ; var m: matr ; k, i, j : integer ; p: real ; повторно объявленный идентификатор begin clrscr ; неизвестный идентификатор writeln ( ' k=' ) ; readln (k) ; https://www.cyberforum.ru/ pascalabc/ thread2182142.html Pascal ABC Что описывает эта программа? https://www.cyberforum.ru/ pascalabc/ thread2182087.html
Var x,y,N:integer Begin Write('enter,N:' ); Readln(N); x:=l; while y‹N do Begin y:=x*x; if y<n then write (y,''); x:=x+l;
Pascal ABC С чего начать изучение Pascal ABC
Всем привет. С чего лучше начать изучение Паскаль, мне нужен уровень ЕГЭ по информатике. Может с каких-то книг? Или видеокурсов? Или специальных сайтов для этого? Пробывал поискать, но годного ничего нет, а другие языки для ЕГЭ не хочу.
Pascal ABC Протабулировать функцию https://www.cyberforum.ru/ pascalabc/ thread2181839.html
помогите плз решить задание, простой ABC паскаль На интервале a ≤ y ≤ b протабулировать функцию d=\frac{(a-b)^2+\ln y}{1+\sin ^2(x+y)}+\ln \left(\frac{a-b}{y}+\sqrt{x^{\,}} \right)\,, причём, если
Эксперт Pascal/Delphi
6811 / 4568 / 4819
Регистрация: 05.06.2014
Сообщений: 22,438
31.01.2018, 19:39 0

Переписать в массив В все элементы матрицы А, расположенные ниже побочной диагонали - Pascal ABC - Ответ 12079229

31.01.2018, 19:39. Показов 1530. Ответов 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
30
31
32
33
34
35
36
37
38
39
program massivA;
 
uses crt;
 
const
  N = 18;
  M = 18;
 
var
  a: array [1..N, 1..M] of integer;
  k, I, J: integer;
  b: array [1..N * m] of integer;
 
begin
  clrscr;
  randomize;
  for i := 1 to N do
    for j := 1 to M do
      a[I, J] := random(201) - 100;
  for i := 1 to N do
  begin
    for j := 1 to M do
      write(a[I, J]:4);
    writeln
  end;
  for i := 1 to n do
  begin
    for j := 1 to m do
      if (i + j > m + 1) then 
      begin
        inc(k);             
        b[k] := a[i, j];    
      end;
  end;
  writeln;
  for i := 1 to k do
    write(b[i]:4);
  readln;
end.


Вернуться к обсуждению:
Переписать в массив В все элементы матрицы А, расположенные ниже побочной диагонали Pascal ABC
1
Заказать работу у эксперта
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
31.01.2018, 19:39
Готовые ответы и решения:

Массив: Заменить нулями все элементы, расположенные на побочной диагонали и ниже ее матрицы
Создайте массив A с помощью генератора случайных чисел и выведите его на экран.Увеличте все его...

Заменить нулями все элементы, расположенные на побочной диагонали и ниже ее матрицы
Заменить нулями все элементы, расположенные на побочной диагонали и ниже ее матрицы размером 7x7.Не...

В файл переписать элементы, расположенные ниже побочной диагонали матрицы
1) Дан текстовый файл, в котором записаны элементы квадратной матрицы. Создать дополнительный файл,...

Заменить нулями все элементы матрицы, расположенные на побочной диагонали и ниже ее
Вот с этой задачей возникла проблема: Дана квадратная матрица порядка n. Заменить нулями все ее...

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

Отрицательные элементы матрицы, расположенные ниже побочной диагонали, заменить нулями
1.В вещественной матрице A все отрицательные элементы, расположенные ниже побочной диагонали...

Дана матрица. Заменить все элементы, расположенные на побочной диагонали и ниже её
Дана матрица размерностью 9x9. Заменить все элементы, расположенные на побочной диагонали и ниже...

В матрице все отрицательные элементы, расположенные ниже побочной диагонали, заменить нулями
Помогите пож с задачей - решить двумерным массивом с использованием I = 1 ' Индекс While1...

Выделить в отдельный массив нечетные элементы массива, расположенные ниже побочной диагонали
Дан целочисленный массив a(m,m), m=4. Выделить в отдельный массив нечетные элементы массива,...

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