Здравствуйте, помогите, пожалуйста, составить программу

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

в избранное

dany359

07 марта 2023

Var i: integer; aa: array[1… 9] of integer; begin { высчитываем элементы массива } for i: =1 to 9 do if i mod 3=1 then aa[i]: =(i+5)*(i+5) else if i mod 3=2 then aa[i]: =round (sqrt (aa[i-1]) else aa[i]: =aa[i-1] div aa[i-2]; { выводим значения на экран } for i: =1 to 9 do write (aa[i], '); end.

пользователи выбрали этот ответ лучшим

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

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

Знаете другой ответ?