Matice problem – Pascal – Fórum – Programujte.com
 x   TIP: Přetáhni ikonu na hlavní panel pro připnutí webu
Reklama
Reklama

Matice problem – Pascal – Fórum – Programujte.comMatice problem – Pascal – Fórum – Programujte.com

 

Hledá se programátor! Plat 1 800 € + bonusy (firma Boxmol.com)
mochhito0
Duch
4. 1. 2014   #1
-
0
-

Ahoj, morduji se s problemem, ohledne funkci numberOfColumns a numberOfRows, ty sice pocitaji co maji, avsak uz se pozadovane hodnoty (m) a (n) nevrati jako globalne premenne (tzn. vo funkcii bezi vsechno tak jak ma, pri prechadzeni numberOfRows se nakonci napr. m=3, avsak pote co se skonci telo funkce, se m znovu nastavi na 0) 
Mozno mam problem nekde u definovani funkce etc. nevim. Tipy uvitam. Diki :)

cast kodu:

function numberOfRows(m:integer):integer;
  begin
     clrscr;
     writeln('Put the size of matrix');
     writeln;
     write('Number of row: ');
     readln(m);
     numberOfRows:=m;

  end;

function numberOfColumns(n:integer):integer;
  begin
     write('Number of columns: ');
     readln(n);
     numberOfColumns:=n;
  end;




procedure readInput;
  begin
  if areTwoMatrix= false then
    begin
      numberOfRows(m);
      numberOfColumns(n);
      m1:=m;
      n1:=n;
      clrscr;
      writeln('Write the first matrix: ');
      writeln;
      for i:=1 to m1 do
        for j:=0 to n1 do
          read(a[i,j]);
    end;

  if areTwoMatrix= true then
     begin
       if isSizeOfMatrixTheSame=true then
         begin
           m2:=m1;
           n2:=n1;
         end
       else
         begin
           numberOfRows(m);
           numberOfColumns(n);
           clrscr;
           m2:=m;
           n2:=n;
         end;

       writeln('Write the second matrix');
       writeln;

       for i:=1 to m2 do
         for j:=0 to n2 do
           read(b[i,j]);
     end;
  end;

procedure plus;
  begin
    areTwoMatrix:=false;
    readInput;
    areTwoMatrix:=true;
    isSizeOfMatrixTheSame:=true;
    readInput;
    clrscr;

    writeln('Matrix A + matrix B = ');
    writeln;
    for i:=1 to m1 do
      begin
        for j:=1 to n1 do
          begin
            c[i,j]:=a[i,j]+b[i,j];
            write(c[i,j],' ');
          end;
        writeln;
      end;
  end;
Nahlásit jako SPAM
IP: 78.128.196.–
Reklama
Reklama
KIIV+42
God of flame
4. 1. 2014   #2
-
0
-

staci si precist, jak se vraceji hodnoty z funkci...

Nahlásit jako SPAM
IP: 94.113.93.–
Program vždy dělá to co naprogramujete, ne to co chcete...
JoDiK
~ Anonymní uživatel
981 příspěvků
4. 1. 2014   #3
-
0
-

Vidím, že se spíš morduješ s programováním jako takovým, dělat na každou operaci samostatnou funkci je jaksi proti principům strukturovaného programování.

Buď se to dělá tak, že se napíše program bez podprogramů a zkoumáním opakujících se částí se tyto oddělí jako procedury a funkce. Nebo (pokud si člověk nejdřív důkladně algoritmus promyslí) se rovnou píší jednotlivé univerzální podprogramy, a ty se pak v hlavním programu, případně navzájem využívají.

V tvém případě: chceš načítat údaje: rozměry matice - tak si uvědom co se při načítání dělá stejně a čím se bude načítání jednotlivých údajů lišit. Zjistíš, že se liší pouze text vypisovaný před načítaným údajem, vlastní načítání je stejné. Takže si vyrobíš podprogram na načítání (tady je asi jedno, jestli to bude funkce nebo procedura - což mi připomíná - nastuduj si jak fungují, abys pak funkci nepoužíval jako proceduru navíc se špatným typem parametru).

Nahlásit jako SPAM
IP: 88.100.43.–
Zjistit počet nových příspěvků

Přidej příspěvek

Toto téma je starší jak čtvrt roku – přidej svůj příspěvek jen tehdy, máš-li k tématu opravdu co říct!

Ano, opravdu chci reagovat → zobrazí formulář pro přidání příspěvku

×Vložení zdrojáku

×Vložení obrázku

Vložit URL obrázku Vybrat obrázek na disku
Vlož URL adresu obrázku:
Klikni a vyber obrázek z počítače:

×Vložení videa

Aktuálně jsou podporována videa ze serverů YouTube, Vimeo a Dailymotion.
×
 
Podporujeme Gravatara.
Zadej URL adresu Avatara (40 x 40 px) nebo emailovou adresu pro použití Gravatara.
Email nikam neukládáme, po získání Gravatara je zahozen.
-
Pravidla pro psaní příspěvků, používej diakritiku. ENTER pro nový odstavec, SHIFT + ENTER pro nový řádek.
Sledovat nové příspěvky (pouze pro přihlášené)
Sleduj vlákno a v případě přidání nového příspěvku o tom budeš vědět mezi prvními.
Reaguješ na příspěvek:

Uživatelé prohlížející si toto vlákno

Uživatelé on-line: 0 registrovaných, 18 hostů

Podobná vlákna

Matice, problém — založil crAzY^

Matice — založil brucak

Moderátoři diskuze

 

Hostujeme u Českého hostingu       ISSN 1801-1586       ⇡ Nahoru Webtea.cz logo © 20032016 Programujte.com
Zasadilo a pěstuje Webtea.cz, šéfredaktor Lukáš Churý