Elektroda.pl
Elektroda.pl
X
Proszę, dodaj wyjątek dla www.elektroda.pl do Adblock.
Dzięki temu, że oglądasz reklamy, wspierasz portal i użytkowników.

Program w Pascalu do napisania

07 Gru 2006 16:12 762 4
  • Poziom 10  
    Drodzy koledzy i koleżnaki mam do napisania program w Turbo Pascalu:

    "Napisz algorytm, którego wynikiem działania jest wartość najmniejszej z trzech rożnych liczb podanych na wejściu"

    To są moje początki z tym programem.
    Proszę o jakieś pomocne linki.

    Chyba musze wpisać warunki IF?

    IF A>B>C THEN
    WRITE ('A>B>C')
    ELSE
    WRITE ('C>B>A');

    Już się pogubiłem
    :cry:

    Z góry dzięki za pomoc

    Moderowany przez MirekCz:

    Przeniesione z Programowanie ogólne.

  • Poziom 27  
    Musisz porównywać kolejne pary liczb ze sobą. Ta która jest mniejsza jest zapamiętywana, aż porównasz wszystkie.

    Dodano po 1 [minuty]:

    Czyli
    1. porównujesz pierwszą z drugą - mniejszą zapisujesz do zmiennej np. MIN
    2. porównujesz MIN z trzecią - jeśli trzecia < MIN - zapisujesz trzecią do MIN
  • Pomocny post
    Poziom 26  
    najbardziej prostackie rozwiazanie jest takie

    program blablabla;

    var a,b,c: integer;

    begin
    readln(a);
    readln(b);
    readln(c);
    if a>b then if a>c then writeln('najwieksza jest:',a);
    if b>a then if b>c then writeln('najwieksza jest:',b);
    if c>a then if c>b then writeln('najwieksza jest:',c);
    readln;
    end.

    i jesli sa to twoje poczatki to zacznij od tego, przeksztalcajac, zabezpieczajac przed podaniem niewlasciwych zmiennych, dopisz cos, zeby w przypadku dwoch takich samych tez odpowiednio reagowal otp. ;)
  • Poziom 10  
    Dzięki bardzo:D

    Zrobiłeś programik żeby pokazywał największą ale ja już się z tym pobawie.

    Browarek dla Ciebie za pomoc:D