X:=sqrt(x); лол тут надо минимум 20 символов)
Экспертаня система - компьютерная система, способная частично заменить специалиста-эксперта в разрешении проблемной ситуации.
сюда подходят
1) система управления траспортом
2) система моделирования зданий
Операции присваивания (=, +=, -=, *= и т. д.)
Операции присваивания могут использоваться в программе как законченные операторы.
Формат операции простого присваивания (=):
Program fgg;
var
i, n: Integer;
s: Real;
begin
Write('Введите n: ');
ReadLn(n);
for i := 1 to n do
s := s + 1 / i;
WriteLn('s=', s);
end.