задачи на delphi

[Petrovich83]

Даны x, y, z. Вычислить a, b, если
2
1+sin(x+y) 2
a=-------------------- +x, b=cos (arctg(1/z).
2+|x-2x/(1+xy*xy)|

Даны действительные числа x, y. Определить, принадлежит
ли точка с координатами следующей области: квадрат с центром (0,
0) и стороной = 2, стороны параллельны осям координат.

[Антон Лысенко]

Сообщение от Petrovich83

Даны x, y, z. Вычислить a, b, если
2
1+sin(x+y) 2
a=-------------------- +x, b=cos (arctg(1/z).
2+|x-2x/(1+xy*xy)|

прекратите строчить следующие задания, и объясните первое!там ничто никуда не клеится, я понял только чему равняется b!

[Petrovich83]

Даны x, y, z. Вычислить a, b, если а=1+sin^2(x+y)/2+|x-2x/(1+xy*xy)|+x b=cos^2(arctg 1/z)

[Антон Лысенко]

это же простые задачи.
вот 2-я

program Project1;

{$APPTYPE CONSOLE}

uses
  SysUtils;
var x,y:real;
 
begin
  writeln('vvedite x,y');readln(x,y);
 if (x>=-1)and(x<=1)and(y>=-1)and(y<=1) then
   writeln('Tochka (',x:-4:2,',',y:-4:2,')',' prinadlezhit kvadraty')
 else
   writeln('Tochka (',x:-4:2,',',y:-4:2,')','NE prinadlezhit kvadraty');
   readln{ TODO -oUser -cConsole Main : Insert code here }
end.

program Project1;

{$APPTYPE CONSOLE}

uses
  SysUtils;
var x,y,z,a,b:real;
 
begin
  writeln('vvedite x,y,z');
  readln(x,y,z);
  a:=1+sqr(sin(x+y))/2+abs(x-2*x/sqr(x*y))+x;
  b:=sqr(cos(arctan(1/z)));
   writeln('a=',a:-7:2,' b=',b:-7:2);
   readln{ TODO -oUser -cConsole Main : Insert code here }
end.

[Petrovich83]

Спасибо. Просто я вообще не разбираюсь в программировании

[Антон Лысенко]

Сообщение от Petrovich83

Спасибо. Просто я вообще не разбираюсь в программировании

Это заметно
А зачем вам тогда эти задачи? Если это задания по предмету, то вас должны были учить!

[Petrovich83]

учат только поверхностно,объясняют не все,дают задания,как хочешь так и решай

[Антон Лысенко]

Ну для решения этих задач нужно знать только readln, writeln и оператор присваивания ":=" и стандартные ф-ии паскаля, ну и оператор условия if.
Это нам за одну пару объяснили.

[Petrovich83]

Даны действительное число a, натуральное число n. Вычис-
лить: 1/a+1/a/(a+1)+... +1/a/(a+1)/... /(a+n).

[Petrovich83]

Дано натуральное число n. Вычислить:
1+1 n+1
(-1) /1/(1+1)+... +(-1) /n/(n+1)