Wypisywanie zbioru

ZX
  • Rejestracja: dni
  • Ostatnio: dni
  • Postów: 3
0

Witam.
Nie potrafię sobie poradzić z teoretycznie banalnym problemem. Otóż w jaki sposób mogę wypisać zawartość zbioru?
Zawiera on przeciwdziedzinę funkcji y=2x w dziedzinie [0,100]. Nie wolno mi użyć tablic, jak to wypisać?

pelsta
  • Rejestracja: dni
  • Ostatnio: dni
  • Postów: 819
0

O to chodzi?

Kopiuj
for x:=0 to 100 do WriteLn(2*x);
ZX
  • Rejestracja: dni
  • Ostatnio: dni
  • Postów: 3
0

Niestety muszę zrobić to przy pomocy typu zbiorowego.

Kopiuj
 type
przeciwdziedzina = set of byte

Wypełniłem ten zbiór wynikami, ale nie wiem, w jaki sposób to wypisać. Takich typów nie da się za pomocą write/writeln.

Patryk27
  • Rejestracja: dni
  • Ostatnio: dni
  • Lokalizacja: Wrocław
  • Postów: 13042
1

Pętla "for ... in"
For-in
http://delphi.about.com/od/beginners/a/delphi_set_type.htm
Lecz nie jestem pewien, od których wersji Delphi ona działa.
Na pewno nie działa w Delphi 7.

pelsta
  • Rejestracja: dni
  • Ostatnio: dni
  • Postów: 819
1
Kopiuj
var x:Byte;
for x:=0 to 255 do if (x in przeciwdziedzina) then WriteLn(x);
ZX
  • Rejestracja: dni
  • Ostatnio: dni
  • Postów: 3
0

Dzięki wielkie. Właśnie tego potrzebowałem!

Zarejestruj się i dołącz do największej społeczności programistów w Polsce.

Otrzymaj wsparcie, dziel się wiedzą i rozwijaj swoje umiejętności z najlepszymi.