ССССРРРРРРРРРРРРРРЛОООООООООООЧЧЧЧЧЧЧЧНООООООООО!!! 1. Заполнить ...
ССССРРРРРРРРРРРРРРЛОООООООООООЧЧЧЧЧЧЧЧНООООООООО!!!
1. Заполнить одномерный массив, состоящий из 10 элементов, случайными числами от-15 до 35. Найти сумму элементов данного массива. 2. Заполнить одномерный массив, состоящий из 10 элементов, случайными числами от-15 до 35. Найти значение максимального элемента массива.
Есть ответ
12.12.2022
194
Ответ
Два в одном:
var
a: array [1..10] of integer;
s, i, max: integer;
begin
max:= - 16;
for i:= 1 to 10 do
begin
a[i]:= random(50) - 15;
writeln(a[i]);
s:= s + a[i];
if a[i] > max then max:= a[i];
end;
writeln('Сумма элементов массива: ', s);
writeln('Максимальный элемент массива: ', max);
end.
Если вы нашли правильное решение, вы можете поблагодарить нас начиная с 10 рублей.
Просто нажмите на кнопку "Подарить".
Просто нажмите на кнопку "Подарить".
12.12.2022