Много как...
Квадрат числа - Sqr(x)
Число в степени N - Power(x, n)
Корень числа - Sqrt(x)
Корень степени N - Power(x, 1/n)
Синус числа (в радианах) - Sin(x)
Косинус - Cos(x)
Логарифм натуральный - Ln(x)
Логарифм по основанию n - Ln(x)/Ln(n) или LogN(x)
Модуль числа - Abs(x)
Экспонента - Exp(x)
Остальные функции, как и Power, зависят от паскаля. Где-то есть Arctan, Tan, Cotan и т.д., а где-то их нет.
P.S. Не путаемся в знаках, скобках и порядка расстановки литерал.
а) Sqr(1 + x)
б) Sqrt(1 + Sqr(x))
в) Sqr(cos(Sqr(x)))
г) ln(x/5)/ln(2)
д) Arcsin(x)
е) (exp(x) + exp(-x)) / 2
ж) Power(x, sqrt(2))
з) Power(1 + x, 1/3)
и) Sqrt(Power(x, 8) + Power(8, x))
к) (x * y * z - 3.3 * Abs(x + Power(y, 1/4))) / (Power(10, 7) + ln(factor(4)))
л) (beta + sqr(sin(Power(Pi, 4)))) / (cos(2) + Abs(Cotan(y)))
function factor(x: longint): longint;
begin
if x <= 0 then factor := 1
else factor := factor(x - 1) * x;
end;
Чтобы не было такого, что 1 человек несколько раз регистрировался и также, чтобы человек мог восстановить свою страницу в любое время,даже если его взломали.
Котлеты мясные мясо,яйцо,хлеб(кусочек),молоко,лук,чеснок(по желанию),соль,перец,мука.кухонные принадлежности мясорубка,лопатка,сковорода,кастрюля,дощечка.
Вы в интернете посмотри готовое домашнее задание класс и писателя книги. там найдете
Const n=15;
var a: array[1..n] of integer;
i:integer;
begin
for i:=1 to n do begin a[i]:=random(10); write(a[i], ' '); end;
writeln;
for i:=1 to n do if a[i]=4 then write('A[',i,']', ' ');
<span>end.</span>
