Дано натуральное число n. Выяснить, сколько положительных элементов содержит матрица {aij} i, j = 1, …, n, если aij = sin(i+j/2)

@Paha79 · Регистрация: 05.03.2014

Студворк — интернет-сервис помощи студентам

Дано натуральное число n. Выяснить, сколько положительных
элементов содержит матрица {aij} i, j = 1, …, n, если aij = sin(i+j/2).

@Cyborg Drone · 12.03.2014, 11:50

Pascal

const m = 10;
var a: array [1..m, 1..m] of real;
    i, j, k, n: integer;
begin
  repeat
    write('Размер матрицы (1..', m, ')? ');
    readln(n);
    if (n < 1) or (n > m) then writeln('Размер вне диапазона [1..', m, '], повторите ввод.')
  until (n >= 1) and (n <= m);
  writeln('Исходная матрица, элементы матрицы a[i, j] = sin(i + j / 2):');
  k := 0;
  for j := 1 to n do
    begin
      for i := 1 to n do
        begin
          a[i, j] := sin(i + j / 2);
          if a[i, j] > 0 then inc(k);
          write(a[i, j]:7:3)
        end;
      writeln
    end;
  writeln('Количество положительных элементов = ', k);
  readln
end.

@Paha79 0 / 0 / 0 Регистрация: 05.03.2014 Сообщений: 8
		1
	Дано натуральное число n. Выяснить, сколько положительных элементов содержит матрица {aij} i, j = 1, …, n, если aij = sin(i+j/2) 11.03.2014, 09:36. Показов 7432. Ответов 1 Метки нет (Все метки) Дано натуральное число n. Выяснить, сколько положительных элементов содержит матрица {aij} i, j = 1, …, n, если aij = sin(i+j/2). 0

Опции темы

Дано натуральное число n. Выяснить, сколько положительных элементов содержит матрица {aij} i, j = 1, …, n, если aij = sin(i+j/2)

Решение