• Задача №1. Даны действительные числа а1, ...а30. Получить новую последовательность удалением из исходной тех членов, порядковые номера которых кратны трем.
    Задача №2. Поменять местами максимальный отрицательный и первый положительные элементы массива В(18).

    question img

Ответы 2

  • Спасибо за проделанный труд, только он во второй задаче не меняет местами первый положительный элемент и максимальный отрицательный.
    • Автор:

      kitty23gc
    • 5 лет назад
    • 0
  • const  n = 20;var  a: array[1..n] of real;  i: integer;begin  for i := 1 to n do    read(a[i]);  for i := 1 to n do    if(i mod 3 <> 0) then write(a[i], ' ');end.const  n = 18;var  a: array[1..n] of integer;  i, max, fir: integer;begin  max := 1;  fir := 0;  for i := 1 to n do   begin    read(a[i]);    if(fir = 0) and (a[i] > 0) then fir := i;    if(a [i] < 0) and (a[max] < a[i]) then max := i;  end;  i := a[max];  a[max] := a[fir];  a[fir] := i;  for i := 1 to n do     write(a[i], ' ');end.
  • Добавить свой ответ

Еще вопросы

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years