1) Стиральная машина, 2)Холодильник, 3) Проигрыватель, любое техническое устройство. Человек не является формальным исполнителем. Но возможно. если он выполняет работу на конвеере
var a: array[1..12] of real;
i: integer;
begin
randomize;
for i:=1 to 12 do a[i]:=random(11)-5;
for i:=1 to 12 do writeln(a[i]);
readln;
end.
1.
var x,a:integer; p:real;
begin
a:=3;p:=1;
for x:=1 to 5 do p:=p*a*x*x/sqrt(x+5);
writeln('p=',p);
<span>end.
2.
var x,a:integer; p:real;
begin
a:=3;p:=1;x:=0;
while x<5 do
begin
x:=x+1;
p:=p*a*x*x/sqrt(x+5);
end;
writeln('p=',p);
<span>end.
3.
var x,a:integer; p:real;
begin
a:=3;p:=1;x:=0;
repeat
x:=x+1;
p:=p*a*x*x/sqrt(x+5);
until x=5;
writeln('p=',p);
<span>end.
Результат:
p=20122.311710423
</span></span></span>
《》это скобки <> а этознак больше меньше