• Сформируйте и выведите на экран массив из девяти элементов, каждые три последовательных элемента которого составлены по следующему правилу:
    1-й равен квадрату текущего индекса
    2-й равен случайному числу
    3-й равен полусумме двух предыдущих элементов

Ответы 4

  • Вы прочитайте начало ответа: " PascalABC.NET 3.2, сборка 1389 от 01.03.2017 Внимание! Если программа не работает, обновите версию!"
  • На паскале всегда так, переменные выносятся в описание, это не питон. Ну я сам подправил, спасибо
    • Автор:

      nana0fxh
    • 5 лет назад
    • 0
  • Написана программа на Паскале, работает, а Вы рассказываете, что надо ВСЕГДА описания выносить из блока наверх. Реально смешно и даже глупо.
    • Автор:

      judeuwon
    • 5 лет назад
    • 0
  • // PascalABC.NET 3.2, сборка 1389 от 01.03.2017// Внимание! Если программа не работает, обновите версию!begin  var a:array[1..9] of real;  randomize;  for var i:=1 to 9 do begin    case i mod 3 of    1:a[i]:=i*i;    2:a[i]:=random(1,50);    else a[i]:=(a[i-2]+a[i-1])/2    end;    Write(a[i],' ')    end;  Writelnend.Пример1 44 22.5 16 16 10 49 39 23
    • Автор:

      marie
    • 5 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

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

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

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