Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.89/9: Рейтинг темы: голосов - 9, средняя оценка - 4.89
0 / 0 / 0
Регистрация: 13.12.2012
Сообщений: 3
1

Замените буквой а все элементы матрицы, расположенные выше главной диагонали

25.04.2013, 09:15. Показов 1850. Ответов 5
Метки нет (Все метки)

Пусть дана символьная квадратная матрица порядка 10. Замените буквой а все ее элементы, расположенные выше главной диагонали.
__________________
Помощь в написании контрольных, курсовых и дипломных работ здесь
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
25.04.2013, 09:15
Ответы с готовыми решениями:

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

Заменить буквой «a» все элементы, расположенные выше главной диагонали и не являющиеся цифрами
Заменить буквой «a» все элементы, расположенные выше главной диагонали и не являющиеся цифрами.

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

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

5
753 / 546 / 211
Регистрация: 12.11.2009
Сообщений: 1,100
25.04.2013, 09:26 2
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
uses crt;
var
   a:array[1..10,1..10]of char;
   i,j:integer;
begin
   clrscr;
   randomize;
   for i:=1 to 10 do
   for j:=1 to 10 do
    a[i,j]:=char(random(26)+integer('a'));
   for i:=1 to 10 do
    begin
       for j:=1 to 10 do
        begin
           if i=j then textcolor(red)
            else textcolor(black);
           write(a[i,j],'  ');
        end;
       writeln;
    end;
   for i:=1 to 10 do
   for j:=1 to 10 do
    if i<j then a[i,j]:='a';
   writeln;
  for i:=1 to 10 do
    begin
       for j:=1 to 10 do
        begin
           if i=j then textcolor(red)
            else textcolor(black);
           write(a[i,j],'  ');
        end;
       writeln;
    end;
   readkey;
end.
1
0 / 0 / 0
Регистрация: 13.12.2012
Сообщений: 3
25.04.2013, 09:32  [ТС] 3
а можно написать ее по самому обычному без цветов? на самом обычном паскале
0
753 / 546 / 211
Регистрация: 12.11.2009
Сообщений: 1,100
25.04.2013, 09:34 4
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
uses crt;
var
   a:array[1..10,1..10]of char;
   i,j:integer;
begin
   clrscr;
   randomize;
   for i:=1 to 10 do
   for j:=1 to 10 do
    a[i,j]:=char(random(26)+integer('a'));
   for i:=1 to 10 do
    begin
       for j:=1 to 10 do
        write(a[i,j],'  ');
       writeln;
    end;
   for i:=1 to 10 do
   for j:=1 to 10 do
    if i<j then a[i,j]:='a';
   writeln;
  for i:=1 to 10 do
    begin
       for j:=1 to 10 do
        write(a[i,j],'  ');
       writeln;
    end;
   readkey;
end.
1
0 / 0 / 0
Регистрация: 12.11.2020
Сообщений: 2
21.11.2020, 15:20 5
Можно написать в С++
0
Почетный модератор
64087 / 47496 / 32734
Регистрация: 18.05.2008
Сообщений: 115,182
21.11.2020, 15:24 6
Можно, в разделе
https://www.cyberforum.ru/cpp-beginners/
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
21.11.2020, 15:24

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

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

Все элементы массива, расположенные выше главной диагонали сделать равными 0
Создать массив случайных чисел B. Все элементы массива, расположенные выше главной диагонали...

Замените элементы главной диагонали матрицы А(н, н) на 0, а все остальные элементы матрицы на 1
Помогите доделать задачу:первая часть работает,а вот как создать вторую часть задания не...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
6
Ответ Создать тему
Опции темы

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