Задания.ру
Анонимно
2 часа назад

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

Ответ

Анонимно
var
  m,n: array [1..15] of integer;
  a,i,max: integer;
begin
readln(a);
writeln('Исходный массив:');
for i:= 1 to 15 do
   begin
   m[i]:= random(20);
   n[i]:=m[i]*a;
   if (n[i]>max) and (i mod 2=1) then max:=n[i];
   write (m[i],'  ');
   end;
writeln;
writeln('Новый массив:');
for i:= 1 to 15 do  write (n[i],'  ');
writeln;
writeln('Максимальный нечетный: ',max);
end.

Новые вопросы по Информатике

ЯЗЫК ПРОГРАММИРОВАНИЯ ТОЛЬКО PYTHON (ПИТОН) Напишите программу, которая в последовательности натуральных чисел определяет сумму чисел, кратных 6. Программа получает на вход количество чисел в послед...
5 - 9 классы
3 минуты назад
Помогите пж! Условия: Респондент №1 съедает объект "Пицца" за 60 минут. Респондент №2 – за 30 минут, Респондент №3 – за 5 минут. Вопрос: За сколько минут респонденты целиком поглотят один целый объе...
5 - 9 классы
5 минут назад
14 учащихся класса любят детектив, 16 – фантастику, 5 и то , и другое, 1 ничего не читает. Сколько человек в классе? Заранее спасибо.
10 - 11 классы
6 минут назад
Дан фрагмент программы: m:=14  n-m-3 m:n+m write (m,n); какие числа будут выведены на экран? 
10 - 11 классы
8 минут назад
Добрый день! Подскажите пожалуйста ответы на вопросы: 1. Почему в компьютерной сети могут существовать совершенно различные марки компьютеров и другие технические средства? Как они "понимают" друг др...
5 - 9 классы
9 минут назад