Filipskaya20

17.12.2021 20:41 •  Информатика

Найдите ошибки ; надо program mass; uses crt; var b: array [1..10] of integer; i: real; begin clrscr; randomize; for i: =1 to 10 do begin b: =1+random (10); write (‘b[‘: 3, i,’]=‘, b[i]); end; readkey; end.