Массив f заполнен кубами первых 10 натуральных чисел. вставить на 3 место квадрат количества элементов в массиве. в получившемся массиве удалить последовательно пятый и восьмой элементы. программу требуется написать в pascal.

245

379

Посмотреть ответы 3

Ответы на вопрос:

mol202kj00

Информатика

4,5(85 оценок)

Var a, b, c, i, n : integer; s : array [1..10000] of longint; begin read (n); for i: =1 to n do s[i]: =i*i*i; s[3]: =n*n; s[5]: =0; s[8]: =0; for i: =6 to n do s[i-1]: =s[i]; for i: =8 to n do s[i-1]: =s[i]; for i: =1 to n-2 do write (s[i], ' '); end.

poddubtsev

Информатика

4,7(20 оценок)

Var f: array[1..10] of integer; i: integer; begin //заполняем массив кубами чисел for i: =1 to 10 do begin f[i]: =i*i*i; end; f[3]: =length(f)*length(f); delete(5,10); delete(8,10); procedure delete(x: integer; n: integer); var j : integer; begin {сдвиг индекса элементов на один влево} for j: =x to n do begin f[j]: = f[j+1]; end; f[n]: =0; {последний элемент равен 0} end; end.

daeinam095

Информатика

4,4(33 оценок)

Program z; var a: array [1..10] of integer; k,i: integer; begin k: =0; for i: =1 to 10 do readln(a[i]); for i: =1 to 10 do if a[i] mod 10 = 2 then k: =k+1; writeln(k); end.

Реши свою проблему, спроси otvet5GPT

Быстро
Мгновенный ответ на твой вопрос
Точно
Бот обладает знаниями во всех сферах
Бесплатно
Задай вопрос и получи ответ бесплатно

Задай свой вопрос

Популярно: Информатика

Есть вопросы?

Как otvet5GPT работает?

otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
Сколько это стоит?

Проект находиться на стадии тестирования и все услуги бесплатны.
Могу ли я использовать otvet5GPT в школе?

Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
В чем отличия от ChatGPT?

otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.