Dodaj do ulubionych

proste programy w pascalu, prosze o pomoc...

08.01.06, 21:25
witam, jestem studentka chemii i zupelnie nie rozumiem dlaczego ale kaza nam
sie uczyc programowania w pascalu :( niestety mi to nie wychodzi zupelnie,
dlatego zwracam sie z uprzejma prosba o pomoc w napisaniu 3 prostych (dla
kogos kto sie na tym zna) programow:
1. obliczajacy dowolna potege liczby 3
2. obliczajacy sume ciagu arytmetycznego
3. obliczajacy n!
Wszystkie programy musze napisac z uzyciem petli for, z gory dziekuje za
pomoc, pozdrawiam
Obserwuj wątek
    • mx-5 Re: proste programy w pascalu, prosze o pomoc... 08.01.06, 21:50
      A moglabys podac troche wiecej szczegolow ?
      Tzn: czym jest wejscie dla tych programow
      np dla programu 1 wpisujesz np: 2 i wynikiem jest 9 ?
      podobnie dla programu 3 podajesz 3 i otrzymujesz 6 ?

      A co do programu drugiego...co podajesz jako dane :)?
      Latwiej sie pisze program, gdy sie wie co ma robic :D
      • friend21 Re: proste programy w pascalu, prosze o pomoc... 08.01.06, 22:08
        dzieki za szybka odpowiedz...
        wiec pierwszy program, 3 to stala, podaje wykladnik potegi, np 3 a program ma
        podac wynik czyli 3x3x3=27
        drugi program, wypisuje dowolna liczbe cyfr i on oblicza ich sume,
        odnosnie trzeciego silnia wyglada mniej wiecej tak 2!=1x2=2
        4!=1x2x3x4=24...
        z gory dzieki za wszelka pomoc
        • mx-5 Re: proste programy w pascalu, prosze o pomoc... 08.01.06, 22:11
          A z uzyciem procedur/funkcji czy bez ? :)
          • friend21 Re: proste programy w pascalu, prosze o pomoc... 08.01.06, 22:20
            chyba bez... wiesz co to sa podstawy pascala, nic co byloby zbyt skaplikowane :)
        • jasnoniebieski.5 Re: proste programy w pascalu, prosze o pomoc... 08.01.06, 22:23
          co do 2: to wklepuje sie ten ciag recznie czy tworzy sie go przz jakis wzor?
          • friend21 Re: proste programy w pascalu, prosze o pomoc... 08.01.06, 22:25
            wydaje mi sie ze recznie, ale widze pelen profesjonalizm :) dzieki, na zajeciach
            bawimy sie i robimy co chcemy, a na prace dostajemy cos czego wogole nie
            rozumiemy,, paranoja...
            • mx-5 Re: proste programy w pascalu, prosze o pomoc... 08.01.06, 22:33
              Sprawdz poczte, programy sa na twojej gazetowej skrzynce :)
              Poza tym wydaje mi sie ze rownanie Schrodingera i ogolnie rownania falowe jest
              trudniejsze od tych programikow ;)

              3maj sie i pozdrawiam!
    • jasnoniebieski.5 Re: proste programy w pascalu, prosze o pomoc... 08.01.06, 22:33
      Bie wiem o oc chodzi, ale ja nie moge wyslac .pasow, dostaje komunikat ze plik
      jest za duzy :))) 190 bajtow :) ok niewaze, wkleje i Ty go sobie skopiuj i
      zapisz jako .pas

      program potegowanie;
      uses
      crt;
      var
      a,b,i:longint;
      begin
      clrscr;
      b:=1;
      writeln('podaj wykladnik:');
      read(a);
      for i:=1 to a do
      begin
      b:=b*3;
      end;
      writeln('wynik: ',b);
      end.
      ---------------------------------
      program silnia;
      uses
      crt;
      var
      a,b,i:longint;
      begin
      clrscr;
      b:=1;
      writeln('podaj silnie:');
      read(a);
      for i:=1 to a do
      begin
      b:=b*i;
      end;
      writeln('wynik: ',b);
      end.
      • jasnoniebieski.5 Re: proste programy w pascalu, prosze o pomoc... 08.01.06, 22:38
        a tu sa ciagi:
        program ciagi;
        uses
        crt;
        var
        a,b,c,i:longint;
        begin
        clrscr;
        c:=0;
        writeln('podaj dlugosc ciagu:');
        read(a);
        writeln('podaj ciag liczb:');
        for i:=1 to a do
        begin
        read(b);
        c:=c+b;
        end;
        writeln('wynik: ',c);
        end.
      • friend21 Re: proste programy w pascalu, prosze o pomoc... 08.01.06, 22:39
        widze ze ktos tez z chemii :)
        jasnoniebieski widze ze sie starales, ale mialo byc z petla "for"... mimo
        wszystko wielkie, wielkie dzieki
        • jasnoniebieski.5 Re: proste programy w pascalu, prosze o pomoc... 08.01.06, 22:42
          friend21 napisała:

          > widze ze ktos tez z chemii :)
          > jasnoniebieski widze ze sie starales, ale mialo byc z petla "for"... mimo
          > wszystko wielkie, wielkie dzieki
          Hm...moze czegos tutaj nie rozumiem, ale wydaje mi sie, ze we wszystkich 3-ech
          zadaniach uzylem petli for... :/ zle mi sie wtdaje??? :)
          ps.
          mx-5 - wymysliles moze jak/gdzie zapisac tem cholerny miliard rodzajow???
          • mx-5 Re: proste programy w pascalu, prosze o pomoc... 08.01.06, 22:46
            Dobrze napisales, nie ma ani jednego while`a ;)
            Co do zadania , nie myslalem nad nim , obecnie siedzie nad maszyna stosowa na
            zaliczenie :/
            • mx-5 Re: proste programy w pascalu, prosze o pomoc... 08.01.06, 22:48
              Do fried:

              mam jeszcze takia jedna watpliwosc.
              W drugim programie okreslasz ile znakow trzeba wczytac i podajesz ich ilosc i
              potem te znaki( tak jak to zrobil jasnoniebieski ) czy tez podajesz cyfry,
              podajesz i na koniec enter ?
              Bo jesli tak, to petla for nie da sie tego zrobic :)
          • friend21 Re: proste programy w pascalu, prosze o pomoc... 08.01.06, 22:48
            wiesz co szczerze to nie bardzo sie na tym znam wiec nie dyskutuje tylko
            sprawdze czy dziala i drukuje na oddanie, bardzo, bardzo wszystkim dzieki :)
            • jasnoniebieski.5 Re: proste programy w pascalu, prosze o pomoc... 08.01.06, 23:08
              Hehehe...niezle...mozna i tak :)
              Jezeli zalozysz ze ilosc liczb w ciagu jest zawsze stala (np.10) - to mozna
              zrobic tak bez podawania dlugosci ciagu:

              program ciagi;
              uses
              crt;
              var
              wynik,a,b,c,d,e,f,g,h,i,j,q:longint;
              begin
              clrscr;
              a:=0;
              b:=0;
              c:=0;
              d:=0;
              e:=0;
              f:=0;
              g:=0;
              h:=0;
              i:=0;
              j:=0;
              writeln('podaj ciag liczb:');
              for q:=1 to 1 do
              begin
              read(a,b,c,d,e,f,g,h,i,j);
              wynik:=a+b+c+d+e+f+g+h+i+j;
              end;
              writeln('wynik: ',wynik);
              end.
    • mx-5 Re: proste programy w pascalu, prosze o pomoc... 08.01.06, 23:30
      hmm.. mialem na mysli cos innego :)
      W Pascalu jest cos takiego jak eoln - czyli koniec lini.
      W instrukcji:

      while not eoln do
      begin
      ...
      end;

      po prostu mozesz wczytywac tyle znakow ile sobie zazyczysz( tzn. tyle ile
      pomiesci bufor systemu ;p) i walniesz enter i bedzie spoko ;]
      • friend21 Re: proste programy w pascalu, prosze o pomoc... 08.01.06, 23:33
        wielka prosba, sprawdzalam kilka z waszych programow i niestety nie dziala, albo
        nie kumam bo nie mialismy jeszcze wszystkiego :( czy moze ktos napisac 1 i 3
        program naprawde w jak najprostszy sposob, jedynie z petla for? naprawde bedzie
        wdzieczna, pozdrawiam
    • mx-5 Re: proste programy w pascalu, prosze o pomoc... 08.01.06, 23:35
      Programy dzialaja na pewno, byc moze po prostu nie widzisz ich wynikow?
      Aby zobaczyc wyniki naciskasz alt+F5 po wykonaniu programu ;]
      • friend21 Re: proste programy w pascalu, prosze o pomoc... 08.01.06, 23:42
        dobra pierwszy program dziala :D sukces!!! dzieki wam wszystkim!! kolej na
        nastepne...
        • mx-5 Re: proste programy w pascalu, prosze o pomoc... 08.01.06, 23:45
          ew. jesli chcesz aby wyswietlil sie wynik i program czekal az cos nacisniesz, na
          koncu kazdego programu przed

          end.

          dodaj readln;
          tzn:

          readln;
          end.

          Wtedy program bedzie czekal na wcisniecie jakiegos klawisza ;]
          Pozdr!
      • jasnoniebieski.5 Re: proste programy w pascalu, prosze o pomoc... 08.01.06, 23:47
        Zeby zadzialalo eoln lub eof trzeba uzyc petli while :) a co od programow 1 i 3
        - dopisz pomiedzy wynikiem a end'em. dwie linijki:

        readln;
        readln;

        wtedy program zakonczy sie wtedy, gdy nacisciesz enter
        • jasnoniebieski.5 Re: proste programy w pascalu, prosze o pomoc... 08.01.06, 23:50
          mam niezle lagi i dlatego brak nam synchronizacji :) a z jednym readln'em daleko
          nie zajedzie, bo nadal nedzie sie jej konczyl i wychodzil :)
          • friend21 Re: proste programy w pascalu, prosze o pomoc... 09.01.06, 00:05
            a co jesli nie zrobie tego zalozenia ze zawsze musi byc 10 liczb?
    • mx-5 Re: proste programy w pascalu, prosze o pomoc... 09.01.06, 00:01
      Nie wiem jak w Twoich programach, bo nie czytalem ich dokladnia, ale u mnie
      jeden readln i czeka.Po co dwa ?
      Wyswietla sie wynik i koniec progamu.
      Po dodaniu jednego readline`a program czeka na nacisniecie klawisza.
      Po nacisnieciu go program konczy dzialanie, a chyba tak powinno byc ? ;)
      Szczerze mowiac, jeszcze nie spotkalem sie z 2x readln w mojej karierze, ale
      wszytsko jest mozliwe :]

      • friend21 Re: proste programy w pascalu, prosze o pomoc... 09.01.06, 00:20
        a nie wiecie dlaczego przy programie o ciagach pokazue mi sie blad, ale ze
        oczekuje ;" ale na koncu, za end postawilam kropke a on mowi ze zle...
Inne wątki na temat:

Nie pamiętasz hasła

lub ?

 

Nie masz jeszcze konta? Zarejestruj się

Nakarm Pajacyka