1. Из каких объектов можно проектировать форму для и ввода данных в СУБД Access? Приведите пример.
2. В чем отличие составной формы от Приведите пример.​

var x1,x2,x3,x4: integer;

function max(a,b: integer): integer

begin

    if a> b then max: = a

    else max: =b;

end;

begin

  read(x1,x2,x3,x4);

  x1: =max(x1,x2);

  x2: =max(x3,x4);

  x1: =max(x1,x2);

  writeln(x1);

end.

файл в паскале должен иметь расширение конечно же а)

пронумеруем для наглядности:   1, 2, 3, 4  итак:   1) сравниваем первую пару, например 1 и 2  2) сравниваем вторую пару — 3 и 4  3) сравниваем победителей первых двух пунктов между собой. победитель будет самым тяжёлым  4) сравниваем проигравших первых двух пунктов между собой. проигравший будет самым лёгким  5) теперь сравниваем те 2 арбуза, которые остались посерединке.