Прога в паскале не работает const n=11; var mm, i : array [1..n] of real ; begin randomize ; for i: =1 to n do begin mm[i]: =0.1*random((100-3)*10+1)-3 ; write (mm[i]: ' ') end; for i: =1 to n do if i mod 7< > 0 then writlen (m[i]); end .

4992554419    1   08.10.2019 02:20    0