Есть ответ 👍

Pc2-3200 пропускная способность модулей памяти


150
266
Посмотреть ответы 1

Ответы на вопрос:


program dz;

uses crt;

var mac: array [1..10] of integer;

b,c: integer;

begin

for b: =1 to 10 do

begin

mac[c]: = randomize (-10-(10)+1)+(10);

if mac[c]< 0 then

write (mac[c],', ');

end;

writeln (mac);

end.

Популярно: Информатика