Заполните массив 11-ю случайными числами промежутка [-20; 10]. Выведите его в строке.…

Question

64

Заполните массив 11-ю случайными числами промежутка [-20; 10]. Выведите его в строке. Все элементы с нечетными значениями уменьшите в 3 раза, аостальные — увеличьте на 5. Выведите новый массив

категория: информатика

ответить

в избранное ссылка

Знаете ответ?

pinch · Accepted Answer

65

pinch

17 апреля 2023

var a: array[1… 11]of integer; i: integer; beginrandomize; for i: =1 to 11 do a[i]: =random (31) -20; for i: =1 to 11 do write (a[i],'); writeln; for i: =1 to 11 do if a[i] mod 2<>0 then a[i]: =a[i] div 3 else a[i]: =a[i]*5; for i: =1 to 11 do write (a[i],'); end.

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: