что никакая машина не будет работать без человека, я думаю если за машиной работает толковый знающий человек,которые умеет этой машиной, то тогда работой машины и человека будут восхищаться. а если машину сделал неумелец или на ней работает неумелец-это крах машине и человеку
Uses GraphABC;
const MaxShar=50;
type shar = record
x,y:integer;
dx,dy:integer;
end;
var i:byte;
x,y,r:integer;
shars: array[1..MaxShar] of shar;
begin
randomize;
setwindowsize(500,500);
centerwindow;
r:=10;
setpenwidth(3);
for i:=1 to MaxShar do
with shars[i] do
begin
x:=7+r+random(500-2*r-14);
y:=7+r+random(500-2*r-14);
dx:=random(8) + 1;
dy:=random(8) + 1;
end;
lockdrawing;
repeat
clearwindow;
for i:=1 to MaxShar do
with shars[i] do
begin
x:=x+dx;
if (x+r+dx>=493) or (x-r+dx<=7) then dx:=-dx;
y:=y+dy;
if (y+r+dy>=493) or (y-r+dy<=7) then dy:=-dy;
setpencolor(clBlue);
setbrushcolor(clBlue);
circle(x,y,r);
end;
setpencolor(clBlack);
setpenwidth(3);
moveto(5,5);
lineto(495,5);
lineto(495,495);
lineto(5,495);
lineto(5,5);
sleep(1);
redraw;
until false;
end.
Примечание:
В конце программы есть команда sleep(), чем больше в ней значение, тем меньше скорость шариков. Также её можно просто убрать, тогда скорость будет максимальной.
Поделитесь своими знаниями, ответьте на вопрос:
можно её понять, как факт, что сама по себе машина ничего не стоит, ибо она не живая, её можно купить, продать, выкинуть и т.д , то есть это вещь.человек же - это прежде всего живое существо, более утончённое хоть и имеет некоторые сходства с механизированой техникой. с человеком нельзя обращаться как с машиной, человек и его здоровье - превыше всего, ибо жизнь превыше всего, соответственно без жизни, которую человек в машину вкладывает - это всего лишь кусок железа и прочих металлов. отсюда - человек и безопасность превыше куска железа.