мне очень буду очень признателен если будет хотя бы краткое пояснение заранее

рождения 30.05.95

300

сохранить информацию о наблюдаемом объекте 

передать информацию о нём другим людям

испытать на модели работу объекта ,если испытание объекта-оригинала  опасно или дорого

var x,y,h: real;

begin

  h: =2;

  x: =1;

  repeat

        y: =5*x-2;

        writeln(x: 5,y: 5);

        x: =x+h;

  until x> 20;

end.

если не считать пропущенное равно, то нужна разница квадратов в и а