19.03.2013, 22:24
|
#1 (permalink) |
|
Member
Регистрация: 19.03.2013
Сообщений: 15
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: -131
|
Определить количество положительных элементов матрицы
 б) Определить количество положительных элементов матрицы. |
|
|
|
19.03.2013, 22:24
|
|
|
Helpmaster
Member
Регистрация: 08.03.2016
Сообщений: 0
|
Чтобы не заходить в тупик вы можете пролистать аналогичные темы Количество компонент матрицы совпадающих по абсолютному значению с максимумом Дан массив A(n,m). Найти количество элементов в каждой строке, меньшего диагонального Определить минимальное количество первых символов слов Из положительных элементов исходного массива сформировать новый массив Сумма положительных элементов Найти номера последних положительных элементов каждой строки |
|
20.03.2013, 00:20
|
#2 (permalink) |
|
Member
Регистрация: 29.01.2013
Сообщений: 91
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 565
|
11 б)
Поскольку язык неуказан то в общем виде Может быть так Алгоритм. 1.1 объявляете двухмерный массив, любого типа. 1,2 объявляете счетчики циклов 2 шт, целого типа 1,3 переменная сумматор, целого типа 1,4 объявляете переменные хранящие количества строк и количества столбцов в массиве, целого типа. 2,1 Вводите значение переменной количество строк. 2,2 Вводите значение переменной количество столбцов. 3,1. организуете вложенный цикл типа для заполнения массива for счетчик приравниваете к 1 или 0 в зависимости от начала массива , указываете до какого значения будет меняться счетчик (зависит от размера матрицы количество строк рекомендуется), ( если язык С/С++ или си ориентированный то дополнительно нужно указать приращение счетчика обычно это 1) for то же только второй пункт будет количество столбцов. 3,2 В теле (тело цикла может обозначаться как {}, begin end; и т.д в зависимости от языка ) вложенного цикла Задаете значение каждому элементу путем либо ввода с клавиатуры, либо путем вызова функции генерирующей псевдослучайное значение (random() в некоторых языках). 4. переменной сумматору присваиваете значение 0 5,1 еще раз организуете вложенный цикл 5,2 В теле второго цикла устраиваете проверку значения элемента массива на принадлежность к положительным числам. Для этого можно использовать if (условие отбора (текущий элемент массива >0)) в случае возврата значения истина 5,3 увеличиваем значение переменной сумматор на 1. Это можно сделать конструкцией вида сумматор знак присваивания сумматор + 1. Альтернативный способ использование операторов инкремента (++, inc() ). После выхода из циклов остается вывести значение сумматора может в файл или на монитор на ваше усмотрение. |
|
|
|
|
20.03.2013, 15:02
|
#5 (permalink) | |
|
Специалист
Регистрация: 27.08.2008
Адрес: Санкт-Петербург
Сообщений: 27,807
Сказал(а) спасибо: 340
Поблагодарили 583 раз(а) в 208 сообщениях
Репутация: 113184
|
Цитата:
Ладно, вот Вам задачки на сумму и произведение "в одном флаконе". Код:
Var
x,S,P:real;
N,i:Word;
Begin
Write('x= ');
Readln(x);
Write('N= ');
Readln(N);
S:=0;
P:=1;
For i:=1 to N do
begin
S:=S+Sqr(x-1.0*i);
P:=P*(x+1.0*i)/i/i;
end;
Writeln('S= ',S:0:3,' P= ',P:0:18);
Readln
End.
Код:
Const
M=16;
N=18;
Var
A:Array[1..M,1..N] of Integer;
i,j:Byte;
Npos:Word;
Begin
Npos:=0;
Randomize;
For i:=1 to M do
begin
For j:=1 to N do
begin
A[i,j]:=60-Random(100);
write(A[i,j]:4);
if A[i,j]>0 then Inc(Npos);
end;
Writeln;
end;
Writeln;
Writeln('Number of positive elements is ',Npos);
Readln
End.
|
|
|
|
|
| Ads | |
|
Member
Регистрация: 31.10.2006
Сообщений: 40200
Записей в дневнике: 0
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 55070
|
|
|
20.03.2013, 15:26
|
#6 (permalink) |
|
Member
Регистрация: 19.03.2013
Сообщений: 15
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: -131
|
спасибо Владимир
|
|
|
|
| Ads | |
|
Member
Регистрация: 31.10.2006
Сообщений: 40200
Записей в дневнике: 0
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 55070
|
|
 |
|
|
Линейный вид
