в массиве чисел z1, z2, ..., z200 найти произведение чисел z5, z10, ..., z200.

139

417

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

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

FJFJKD99

Информатика

4,6(10 оценок)

#include <iostream>

#include <vector>

using namespace std;

signed main(){

const int n = 200;

int ans = 1;

vector<int> a(n+1);

for(int i = 1; i <= n; i++){

cin >> a[i];

if(i % 5 == 0) ans *= a[i];

}

cout << ans;

}

opakp9726

Информатика

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

PascalABC.NETbegin var z := ArrRandom(200, 1, 50); z.Println; z[4::5].Aggregate(BigInteger.One,(p,x)->(p*x)).Printend.

Пример работы:

в массиве чисел z1, z2, ..., z200 найти произведение чисел z5, z10, ..., z200.

Альтракас

Информатика

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

Поскольку протестировать программу без файла нельзя, вот код, нужный файл. // pascalabc.net 3.3, сборка 1579 от 18.11.2017 // внимание! если программа не работает, обновите версию! type fint=file of integer; begin var f: fint; assign(f,'integers.bin'); rewrite(f); seqrandom(20,-50,50).foreach(t-> write(f,t)); f.close end. а теперь, собственно, решение type fint=file of integer; begin var f: fint; assign(f,'integers.bin'); reset(f); var k: =0; var b: integer; while not eof(f) do begin read(f,b); if b.iseven then k+=1 end; f.close; writeln('кол-во четных компонент файла равно ',k) end. и последнее - программа распечатки значений компонент файла. для контроля. type fint=file of integer; begin var f: fint; assign(f,'integers.bin'); reset(f); var b: integer; while not eof(f) do begin read(f,b); print(b) end; writeln; f.close end.

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

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

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

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

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

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

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

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

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

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