Сформируйте массив, содержащий 15 элементов, с помощью датчика случайных чисел.…

Question

50

Сформируйте массив, содержащий 15 элементов, с помощью датчика случайных чисел. Получите новый массив, каждый элемент которого равен среднемуарифметическому соответствующего элемента исходного массива и введенного с клавиатуры числа A. В полученном массиве найдите максимальный элемент среди элементов с нечетными номерами. Выведите на экран исходные и полученные результаты. Пожалуйста напишите полностью всю программу

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

ответить

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

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

vensign · Accepted Answer

40

vensign

15 апреля 2023

var arr: array [1… 15] of real; a, max: real; i: integer; begin read (a); randomize; for i: =1 to 15 do arr[i]: =random (20); for i: =1 to 15 do write (arr[i], '); writeln; writeln; for i: =1 to 15 do write (arr[i]+a) / 2, '); max: =arr[1]; writeln; for i: =3 to 15 do if i mod 2=1 then if arr[i] > max then max: =arr[i]; writeln ('max=', max); end.

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

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

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

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