Каким будет распределение температуры во внутренних точках пластины, если в условиях исходной задачи сварочная дуга нагревает пластину до 6000°C не в центральной зоне, а по вертикальной линии шириной один квадрат от верхнего края до нижнего?

s: = str(number);

for : = 1 to length(s)  div 2 do

  if s[i] < > s[length(s) - i + 1] then writeln("не палиндром")ж 

1л=1дм^3

8л = 0.008 куб метров

5.68кг=0.00568 тон

плотность

0.00568/0.008=0.71 тон на кубометр

500*0.71 = 355 тон влезет в цистерну

type array100 = array [1..100] of integer; var x,y: array100; i,n,min,max: integer; begin  randomize;   n: =10;   for i: = 1 to n do begin      x[i]: =random(n*10)- 10*n div 2 ;       write(x[i]: 4);       if i mod 10=0 then writeln;   end;     min: =1;   max: =1;   for i: = 1 to n do begin      if x[i]< x[min] then min: =i;       if x[i]> x[max] then max: =i;   end;   i: =x[min];   x[min]: =x[max];   x[max]: =i;         writeln;   for i: = 1 to n do begin      write(x[i]: 4);       if i mod 10=0 then writeln;   end;   end.

роль:

1.  появление новых средств, накопление информации на машиночитаемых носителях.

2.  развитие средств связи, обеспечивающие доставку информации практически в любую точку, без ограничения времени и пространства.

3.  возможность автоматической обработки информации с компьютеров по данным алгоритмам (сортировка, классификация, представление в нужной форме).

область применения: везде. в частной жизни каждого человека, на всех производствах, в любой работе где необходима работа с информацией.