Множества, записи и работа с файлами Опции

[Spinne]

Задали мне тут задачки, в которые я просто не врубаюсь.
Ну например -  Дано множество символов. Определить ,есть ли в данном множестве определенный символ. В учебнике множества не могу найти вообще.
Вот еще -  Из списка группы вывести фамилии и имена девочек. Как использовать записи?
Ну и последняя - Построить график функции ......... и записать его в файл.

[Spinne]

А как насчёт задачи?

Код

program f;
  uses graph;
  var gd, gm: integer;
      x,y: real;
begin
  gd:=detect;
  initgraph(gd, gm, ‘c:/ bp’);
  SetColor(5);
  Line(0, 240, 640, 240);
  Line(320, 0, 320, 480);
  x:=-20;
  While x<=20 do
    begin
        y:=-Sqr(x);
        PutPixel(x *5 + 320, y*5 +240, 15);
        x:=x+ 0.01;
        end;
end.

Работает только если ставлю x,y:integer, а в 3 строке снизу x:=x+1
Иначе Type missmatch
И вообще, зачем множить на 5? Только для того чтобы график был шире?