Jump to content
СофтФорум - всё о компьютерах и не только

процедуры и функции


nolx
 Share

Recommended Posts

1.вычисление количества положительных элементов в четных строках матрицы через функцию

2.вычисление сумм положительных и отрицательных элементов и количество отдельных элементов матриц через процедуру

!

Предупреждение:

И зачем две одинаковых до слова темы с разными названиями?

Плюшка выдана, лишнее удалено...

Edited by Yezhishe
Link to comment
Share on other sites

nolx:

Во-первых, для этого есть специальная "важная" тема "Заказы "Сделайте все за меня"".

Во-вторых, надо указывать, на каком языке.

По 1-й части для Turbo Pascal:

function np(a:array of integer; m:integer):integer;   var s,i:integer; begin s:=0; for i:=0 to m-1 do if a[i]>0 then inc(s); np:=s end;const m=10; n=10;var a:array[1..m,1..n]of integer; i,j,s:integer;beginrandomize; for i:=1 to m do for j:=1 to n do a[i,j]:=random(199)-99; writeln;for i:=1 to m do begin for j:=1 to n do write(a[i,j]:4); writeln end;s:=0; for i:=1 to m div 2 do s:=s+np(a[2*i],n); writeln; writeln('amount=',s); readlnend.

По второй части, что такое "количество отдельных элементов матриц", я не понял.

Edited by Тролль
  • Upvote 1
Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...