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

@Лаки · Регистрация: 05.12.2010

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

Искала задачи, нашла в с++, а нужно в паскале сотворить следующее.

Использование стандартных функций для работы с массивами.
Сформировать квадратную матрицу порядка N по правилу A[I, J] = $https://www.cyberforum.ru/cgi-bin/latex.cgi?sin(({I}^{2}-{J}^{2})/N)$ и подсчитать количество положительных элементов в ней.

@BiOnix · 17.06.2012, 16:46

Сообщение от Лаки

Искала задачи, нашла в с++, а нужно в паскале сотворить следующее.

Использование стандартных функций для работы с массивами.
Сформировать квадратную матрицу порядка N по правилу A[I, J] = $https://www.cyberforum.ru/cgi-bin/latex.cgi?sin(({I}^{2}-{J}^{2})/N)$ и подсчитать количество положительных элементов в ней.

Pascal

koll:=0;
Randomize;
For i:=1 to N do
   for j:=1 to N do
     begin
     mas[i,j]:=sin((i*i+j*j)/n);
     if mas[i,j]>0 then inc(koll);
     end;

писал без компилятора мб синтаксические ошибки есть =)

@Лаки 0 / 0 / 0 Регистрация: 05.12.2010 Сообщений: 5
		1
	программы усложненной структуры, обработка двухмерных массивов, использование стандартных функций для работы с массивами, сортировка массивов. 15.12.2010, 19:51. Показов 2130. Ответов 1 Метки нет (Все метки) Искала задачи, нашла в с++, а нужно в паскале сотворить следующее. Использование стандартных функций для работы с массивами. Сформировать квадратную матрицу порядка N по правилу A[I, J] = $https://www.cyberforum.ru/cgi-bin/latex.cgi?sin(({I}^{2}-{J}^{2})/N)$ и подсчитать количество положительных элементов в ней. 0

Опции темы

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

Решение