נשלח בתאריך: 25 November 2007 בשעה 21:07 | | IP רשוּם
|
|
|
|
אני יסביר לך בגדול מה עשיתי, עשיתי שתי פונקציות, אחת בודקת את האלכסון הראשי והשניה את שאר איברי המערך, בסוף יש את התוכנית הראשית שמזמנת את שתי הפונקציות ואח"כ שואלת אם זה נכון שהאבירים מלאים כמו שרצית ומחזירה הודעה אם זה נכון והודעה אחרת אם זה לא, זה די בחפיף כאן אז אל תשכח להצהיר על כל המשתנים שלך ולבדוק אותי אם לא שכחתי שום דבר.. בגדול ברגע שקולטים את העניין זה ממש לא קשה.. בהצלחה!!
function mat1(a:array):boolean
{ט"כ:הפרונקציה מקבלת מטריצה, ובודקת אם האיברים שאינם נמצאים באלכסון הראשי מכילים את הספרה אחת ט"י:הפונקציה מחזיקה אמת אם הם מכילים אחת ושקר אחרת}
begin & nbsp;
for i:= 1 to n do
for j:=1 to n do
if i = j then
if a [i,j] ='1' then
mat1:=true
else
mat1:=fulse
end
function mat2(a:array):boolean
{ט"כ:הפרונקציה מקבלת מטריצה, ובודקת אם האיברים שאינם נמצאים באלכסון הראשי מכילים את הספרה אפס ט"י:הפונקציה מחזיקה אמת אם הם מכילים אפס ושקר אחרת}
begin
for i:= 1 to n do
for j:=1 to n do
if i <> j then
if a [i,j] ='0' then
mat2:=true
mat2:=fulse
end
program matriza;
const
n=?
a:array[1..n,1..n]of integer
הצהרות משתנים וכו'..
begin
matriza1:=mat1(a);
mateiza2:=mat2(a)
if (matriza1=true) and (matriza2=true) then
writeln('a matriza kmo sbikasta')d
else
writeln('a matriza lo kmo arzita;)a
end
__________________ "אלוהים נתן לאדם שתי אזניים ופה אחד כדי שיקשיב יותר וידבר פחות."
א.איינשטין
|