[Pascal] Podstawy działania pętli

[wolly]

Witam. Mam zadanie do rozwiązania a nie wiem kompletnie jak się do niego zabrać.
Treść zadania: Za pomocą 3 pętli vor to do, while do oraz repeat until zaprojektować program, który będzie pobierał 2 liczby i będzie robił operacje arytmetyczną jak iloczyn.

Z góry dzieki.

[wawek91]

O ile dobrze rozumiem to ma być coś w stylu:

Kod: Zaznacz cały

int a, b, result = 0;
cin >> a >> b;
for(int i = 0; i < b; i++)
  result += a;
cout << a << "*" << b << " = " << result;

Oczywiście to jest napisane w c++. Zrobiłem to, żeby Ci podpowiedzieć o co chodzi, a teraz przerób to na język pascal.

[wolly]

Dzieki za odpowiedz ale czy móglbys to napisać tak jak jest w pascalu? Jeszcze nie przerabialem c++ więc nierozumiem. Dodam jeszcze do powyższego zadania że dane program ma pobierać z klawiatury.

Z góry thx

[ares41]

wawek91, Pascala uczą zwykle przed C++
wolly, nie pętla vor tylko for

Kod: Zaznacz cały

program petla;
uses crt;
var a,wynik:real;
     i,b:integer;
begin
 read(a,b);
 wynik:=0;
    for i:=1 to b do
        begin  
            wynik:=wynik+a;
         end;
writeln(wynik);
end.

Dla pozostałych pętli spróbuj samemu to przekształcić i pokaż co otrzymałeś - sprawdzimy.

[wolly]

Kod: Zaznacz cały

program petla;
uses Crt;
var a,wynik:real;
i,b:integer;
begin
read(a,b);
wynik:=0
 while
 begin
 wynik:=wynik+a;
end;
writeln(wynik);
end.

Wiem, że jest to prawie to samo ale niestety na temat tych pętli to mam co najwyżej wiedze teoretyczną, np. pętla while do nie posiada zmiennej sterującej pętlą jak pętla for, a i tak nie wiem o co chodzi.
;/

[ares41]

Niestety nie. Składnia błędna.

Pętla while działa na warunku prawdziwym, zatem wykona się ona jeśli zajdzie coś co jest prawdą.
Zastanów się, jaki warunek musi zajść żeby pętla się nam wykonała.

[wolly]

Poddaje się nie dam rady tego zrobić, gdyż po prostu tego nie rozumie. Jak mi ktoś poda 2 pozostałe pętle będę wdzięczny jeśli nie to zrozumie, nie ma nic za darmo.