Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Pascal ABC Вычислить сумму sin(1)+sin(2)+.+sin(n) для n введенного с клавиатуры вычислить сумму sin(1)+sin(2)+...+sin(n) для n введенного с клавиатуры Добавлено через 10 минут сделала:) var s:real; n,i:integer; begin writeln('vvedite n:'); readln(n); s:=0; https://www.cyberforum.ru/ pascalabc/ thread1211826.html Pascal ABC Вычислить значения функции
вычислить значения функции если диапазон изменения аргумента и его шаг заданы.Определить среднее геометрическое положительных значений функций. y=0.5x-2cos(x+π/4) x=π/4; 3π/4] Δx=π/2 Аргументы и значения функции вывести в табличном виде
Pascal ABC Определить количество цифр числа n^2 https://www.cyberforum.ru/ pascalabc/ thread1211761.html
задано натуральное число n(n<=9999) определить количество цифр числа n^2
Pascal ABC В исходной строке а произвести перестановку по алфавиту всех четных слов Задание 2. В исходной строке а произвести перестановку по алфавиту всех четных слов. Вывести исходную и полученную строки. https://www.cyberforum.ru/ pascalabc/ thread1211752.html
Выполнить чтение файла и вывод на экран Pascal ABC
Вариант 9. Создать типизированный файл и записать в него 5 одинаковых вещественных чисел. Записываемые числа и слова вводятся с клавиатуры. Выполнить чтение файла и вывод на экран.
Pascal ABC Оцените игру-шутер uses graphabc,events,Timers; type massiv=array of integer; var x1,y1,x2,y2:massiv; x:array of integer; y:array of integer; i,xs,xz,ys,yz,Qs,Qz,Qzw,Qsw,N,p,j,A,m,z,sg,pg,h,l,sb,pb,time:integer; t:real; s,z1,sg1,pg1,l1,sb1,pb1,s1:string; procedure TimerProc; https://www.cyberforum.ru/ pascalabc/ thread1211736.html
Pascal ABC Найти сумму элементов первой строки массива размером 7х3, состоящей из элементов целого типа const n=3; m=7; var a:array of integer; i,j,sum:integer; begin sum:=0; writeln('Матрица :'); for i:=1 to n do begin for j:=1 to m do https://www.cyberforum.ru/ pascalabc/ thread1211720.html В исходной строке а заменить все четные слова на слово, введенное с клавиатуры Pascal ABC
Вариант № 5 Задание 1. В исходной строке а заменить все четные слова на слово, введенное с клавиатуры. Вывести полученную строку. shyrlo, Множественные задания в одной теме запрещены правилами форума. Для каждой задачи создавайте отдельную тему. Другие Ваши задачи вынесены в отдельные темы: https://www.cyberforum.ru/pascalabc/thread1211752.html...
Pascal ABC Замена минимального элемента строки на первый в заданной матрице 5x5 найти min элемент в каждой строке и записать его на место первого элемента строки, а первый элемент на место min. Начальную и преобразованную матрицу выдать на экран. https://www.cyberforum.ru/ pascalabc/ thread1211694.html Pascal ABC Определить, является ли число четным определить, является ли число четным. f\left(x \right)=\begin{cases}x^2 &\ ,\ \ \left|x \right|<1\\ x-1 &\ ,\ \ \left|x \right|\geq 1\end{cases} https://www.cyberforum.ru/ pascalabc/ thread1211666.html
Вычислить все корни уравнения при n = целые числа от 1 до 100 Pascal ABC
Вычеслить все корни уравнения y=5n+k , где n=целые числа от 1 до 100, k=4,6,15,27,36, и вывести на экран только те корни, которые деляться без остатка на 3,6,8,13,15.
Pascal ABC Определить, какие буквы алфавита не встречаются в данной строке https://www.cyberforum.ru/ pascalabc/ thread1211637.html
Задание 1: Определить, какие буквы алфавита не встречаются в данной строке. Вывести эти буквы в алфавитном порядке Задания2: Посчитать в строке количество слов, начинающихся на сочетание «ав». P.s Благодря всех за помощь
3451 / 2389 / 2135
Регистрация: 04.12.2011
Сообщений: 3,966
19.06.2014, 00:30 0

Заменить нулями все элементы расположенные на побочной диагонали - Pascal ABC - Ответ 6337486

19.06.2014, 00:30. Показов 1377. Ответов 1
Метки (Все метки)

Ответ

Цитата Сообщение от mashka4190 Посмотреть сообщение
как изменить,чтобы нулями заменялись элементы только побочной диагонали
замените вот это:
Pascal
1
2
3
  for i:=1 to n do
    for j:=n+1-i to n do
      a[i,j]:=0;
на это:
Pascal
1
2
  for i:=1 to n do
      a[i,n-i+1]:=0;


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

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

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

Массив: Заменить нулями все ее элементы, расположенные на главной диагонали
дан массив a (5,5). Заменить нулями все ее элементы, расположенные на главной диагонали

Заменить нулями все элементы, расположенные на главной диагонали двумерного динамического массива A[N,N]
заменить нулями все элементы, расположенные на главной диагонали двумерного динамического массива...

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

Дана матрица A(n,n). Заменить нулями все элементы, расположенные на главной диагонали и выше неё
Дана матрица A(n,n). Заменить нулями все элементы, расположенные на главной...

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

В квадратной матрице заменить нулями все элементы, расположенные на главной диагонали и выше главной диагонали
В квадратной матрице заменить нулями все элементы, расположенные на главной диагонали и выше...

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

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

Переписать в массив В все элементы матрицы А, расположенные ниже побочной диагонали
Переписать в массив В все элементы матрицы А, расположенные ниже побочной диагонали. program...

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