Запишите программный код,по которому получается результаты,перечисленные в следующем примере

278

306

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

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

onlysvp

Информатика

4,4(44 оценок)

Var ar: array[1..10] of integer; ar2: array[1..10] of integer; c,i,k: integer; begin; randomize; readln(c); writeln('first array: '); for i: =1 to 10 do begin; ar[i]: =random(10); write(ar[i]: 4); if ar[i]< > c then begin; inc(k); ar2[k]: =ar[i]; end; end; writeln; writeln('final array: '); for i: =1 to k do write(ar2[i]: 4); end.