Помогите пожалуйста! Pascal ABCNET

[Noob_Infor]

macomics, я туп ой , я не знаю как это исправлять, я 2 сутки смотрю в ступоре на это, я есть отойти не могу

begin
  var
angle : real;

  
angle := angle + PI * 1 / 360;
PictureBox1.Left := R * sin(angle); PictureBox1.Top := R * cos(angle);
end.

[macomics]

А что у вас делает блок var после begin
Вот так определяются функции

function <Имя функции>(<Имя аргумента>: <Тип аргумента>; ...): <Тип результата>;
const
  <Имя локальной константы>: <Тип константы> = <Значение константы>;
  ...
var
  <Имя локальной переменной>: <Тип локальной переменной>;
  ...
begin
  <Код функции>;
  ...
end;

Вот так определяются процедуры

procedure <Имя функции>(<Имя аргумента>: <Тип аргумента>; ...);
const
  <Имя локальной константы>: <Тип константы> = <Значение константы>;
  ...
var
  <Имя локальной переменной>: <Тип локальной переменной>;
  ...
begin
  <Код процедуры>;
  ...
end;

У процедуры в отличии от функции нет возвращаемого значения.
Вот так определяются модули

unit <Имя модуля>;

{<Директивы компилятора>}

uses
  <Имена используемых модулей>, ...;

type
  <Имя типа> = <Определение типа>;
  ...

const
  <Имя глобальной константы>: <Тип константы> = <Значение константы>;
  ...

var
  <Имя глобальной переменной>: <Тип переменной>;
  ...

<Объявление процедур>
<Объявление функций>

begin
  <Код модуля>;
  ...
end.

Подробнее тут

ADD: Вместо всего, что указано в <> подставляются необходимые значения. Вместо чего что должно быть подставлено я перечислять не буду. Это вам лучше прочитать книгу по изучению Pascal ABC

[BDA]

macomics, после Турбо Паскаля диковато, но так действительно можно объявлять переменные в ABC.NET ("Переменные могут быть описаны в разделе описаний, а также непосредственно внутри любого блока begin/end." - http://pascalabc.net/downloads/pabcn...fs/vardef.html). Другое дело, что в рассматриваемой задаче angle должна быть глобальной или полем класса, а не локальной.

[macomics]

Можно не значит нужно.

[Noob_Infor]

Поймите, я уже 3 сутки тут сижу, я в паскале вообще дуббббббббббб

PASCAL ABCNET ( поправочка )

Unit Unit1;

interface

uses System, System.Windows.Forms;

type
  Form1 = class(Form)
    procedure button1_Click(sender: Object; e: EventArgs);
  {$region FormDesigner}
  internal
    {$resource Unit1.Form1.resources}
    pictureBox2: PictureBox;
    button1: Button;
    pictureBox1: PictureBox;
    {$include Unit1.Form1.inc}
  {$endregion FormDesigner}
  public
    constructor;
    begin
      InitializeComponent;
    end;
  end;

implementation

procedure Form1.button1_Click
(sender: Object; e: EventArgs);
begin
var
  TTimer:object;
end;
var
angle : real;

begin

  
angle := angle + PI * 1 / 360;
PictureBox1.Left := R * sin(angle); PictureBox1.Top := R * cos(angle);
end.

будьте людьми, кто шарит помогите, у меня 4 дня осталось это сделать

[digitalis]

Это - прдолжение саги https://programmersforum.ru/showthread.php?t=343854 ?
Примечание модератора: темы склеены

[Noob_Infor]

Noob_Infor,
digitalis, я ниче там не понял

[digitalis]

macomics вроде всё детально объяснил.
Я, к сож., ничем помочь не могу - АВС это как бы не совсем Паскаль.

[ViktorR]

Noob_Infor
Исключительно для справки, какой регион?

Для читающих это сообщение.
Подскажите, в каких промышленных разработках вы встречали Pascal ABC?
Варианты с использованием Object Pascal (Delphi, Lazarus) у меня есть, но с ABC нет.

[digitalis]

Дык это вроде как сварганили свою доморощенную версию Паскуаля для облегчения вхождения в программирование?, как в своё время "Ершол". Только я сомневаюсь - научившись стрелять из кривого ружья, из нормального будет нелегко.
А Паскале-подобные вроде как в промышленных разработках не особо применяются, даже "нормальные" вроде Дельфи, оставляя их для обучения. Разработчики брезгливо игнорируют их, превознося С++ и Питона. И что-то не слышно об применении расхваленной Ады. Может, только секретный Пентагон?