Информатика: Для чего нужны человекаподобные роботы?

ShudrenkoArtem

25.12.2021 23:30

Информатика

Есть ответ 👍

Для чего нужны человекаподобные роботы?

261

443

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

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

Noo1989

Информатика

4,5(60 оценок)

Const nx =20; var d: array[1..nx] of integer; i,n,k,sum: integer; begin write('введите число элементов n'); readln(n); for i: =1 to n do begin d[i]: = random(100)-50; write(d[i]: 4); if (d[i]< 0) and (i mod 2 = 0) then k: =k+1; if (d[i] mod 2 =0) and (i mod 2 = 1) then sum: = sum + d[i]; if (d[i]< 0) then d[i]: = d[i] * d[i]; end; writeln; writeln(k); writeln(sum); for i: =1 to n do write(d[i]: 8); end.