Регистрация
АзадаЮсупова
04.12.2020 13:42
Информатика
Есть ответ 👍

Информатика СОР 7 класс

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

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

Konone
Konone
4,7(70 оценок)
Program enot; var p,m: array[1..5] of integer; i: integer; begin for i: = 1 to 5 do p[i]: = random (11)-5; for i: = 1 to 5 do   if p[i] mod 2 =0 then   m[i]: =i*p[i]  else m[i]: =-p[i];   for i: = 1 to 5 do   write(m[i]: 4);   end.

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