Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal ABC
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.60/5: Рейтинг темы: голосов - 5, средняя оценка - 4.60
Пиратъ
1 / 1 / 0
Регистрация: 03.11.2011
Сообщений: 103
1

Заполнить нулями заданную область матрицы

13.02.2012, 15:35. Просмотров 958. Ответов 11
Метки нет (Все метки)

заполнить датчиком случайных чисел массив. А там где на рисунке заштриховано надо заполнить нулём. Картинка квадрат в нём нарисован заштрихованный треугольник
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
13.02.2012, 15:35
Ответы с готовыми решениями:

Заполнить в матрице нулями область над побочной диагональю
дана квадратная матрица: 1 2 3 4 1 2 3 4 1 2 3 4 1 2 3 4 нужно...

Выделить заданную область
Изобразить на плоскости (X, Y) область, в которой и только в которой истинно...

Уплотнить заданную матрицу, удалив из нее строки и столбцы, заполненные нулями...
Уплотнить заданную матрицу, удалив из нее строки и столбцы, заполненные нулями...

Уплотнить заданную матрицу, удаляя из неё строки и столбцы, заполненные нулями.
Уплотнить заданную матрицу, удаляя из неё строки и столбцы, заполненные нулями....

Уплотнить заданную матрицу, удаляя из неё строки и столбцы заполненные нулями
Помогите пожалуйста составить программу в Паскале! 1. Уплотнить заданную...

11
Puporev
Модератор
55047 / 42319 / 29225
Регистрация: 18.05.2008
Сообщений: 100,016
13.02.2012, 17:41 2
Цитата Сообщение от Пиратъ Посмотреть сообщение
в нём нарисован заштрихованный треугольник
????? Где, какой? Трудно изобразить или изображение прикрепить?
0
Пиратъ
1 / 1 / 0
Регистрация: 03.11.2011
Сообщений: 103
13.02.2012, 19:45  [ТС] 3
трудно изображение прикрепить(( ну короче треугольник на пол квадрата
0
thyrex
Вирусоборец
7320 / 4876 / 760
Регистрация: 06.09.2009
Сообщений: 19,525
13.02.2012, 20:04 4
Треугольник на полквадрата тоже можно по разному изобразить
0
Puporev
Модератор
55047 / 42319 / 29225
Регистрация: 18.05.2008
Сообщений: 100,016
13.02.2012, 20:51 5
Цитата Сообщение от Пиратъ Посмотреть сообщение
трудно изображение прикрепить
Конечно трудно, это же нужно несколько раз пальцем нажать, а типа так изобразить еще труднее.
111000
111100
111110
111111
111111
111111
0
Пиратъ
1 / 1 / 0
Регистрация: 03.11.2011
Сообщений: 103
13.02.2012, 22:22  [ТС] 6
а понял треугольник примерно такой
1111111
1111111
1110111
1100011
1000001
0000000
0
Coohper
38 / 38 / 29
Регистрация: 18.10.2011
Сообщений: 91
13.02.2012, 22:33 7
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Так?
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Uses crt;
Var a:array[1..100,1..100]of byte;
    i,j,n:byte;
Begin
ClrScr;
Write('Введите размер матрицы');readln(N);
For i:=1 to n do
Begin for j:=1 to n do
begin
 if (j<=i)and(i+j-1>=n) then begin textcolor(blue);a[i,j]:=1;end
                      else begin textcolor(black); a[i,j]:=0;;end;
 write(a[i,j]:4);
 end;
 writeln;
end;
end.
0
Пиратъ
1 / 1 / 0
Регистрация: 03.11.2011
Сообщений: 103
13.02.2012, 23:31  [ТС] 8
байт на интегер можешь заменить? и зачем texcolor?
0
Coohper
38 / 38 / 29
Регистрация: 18.10.2011
Сообщений: 91
13.02.2012, 23:33 9
Byte этож 0..255 типа экономия, а textcolor для красоты, если хочешь, замени
0
Пиратъ
1 / 1 / 0
Регистрация: 03.11.2011
Сообщений: 103
14.02.2012, 22:54  [ТС] 10
почти так только наоборот у меня везде нули а треуголник один а надо везде единицы а треугольник ноль. Как это сделаь?)
0
Coohper
38 / 38 / 29
Регистрация: 18.10.2011
Сообщений: 91
14.02.2012, 22:56 11
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Единицу и ноль поменяй местами
Pascal
1
2
3
4
5
6
7
For i:=1 to n do
Begin for j:=1 to n do
begin
 if (j<=i)and(i+j-1>=n) then begin textcolor(blue);a[i,j]:=0;end
                      else begin textcolor(black); a[i,j]:=1;;end;
 write(a[i,j]:4);
 end;
1
Пиратъ
1 / 1 / 0
Регистрация: 03.11.2011
Сообщений: 103
14.02.2012, 23:01  [ТС] 12
спасибо
0
14.02.2012, 23:01
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
14.02.2012, 23:01

Уплотнить заданную матрицу, удаляя из неё строки и столбцы заполненные нулями
Помогите пожалуйста составить программу в Паскале! 1. Уплотнить заданную...

Попадает ли точка в заданную область.
Как сделать программу, определяющую, попадает ли точка в заштрихованную область...

Попадение точки в заданную область
И еще одно задание: Для данной области составить линейную программу, которая...


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru