Ответы на вопрос:
begin
seqgen(10, 6, t -> t + 6).aggregate(int64(1), (p, q)-> p * q).println;
seqgen(25, 7, t -> t + 7).sum.println
end.
результат 219419659468800 2275 2) "школярский вариант"(для тех, у кого учителя в развитии застряли в паскале образца 1983 года)
var
i, s: integer;
p: real;
begin
p : = 1;
for i : = 1 to 10 do
p : = p * i * 6;
writeln(p);
s : = 0;
for i : = 1 to 25 do
s : = s + i * 7;
writeln(s)
end.
3) "школопетский вариант"(для тех, у кого голова, чтобы "в нее кушать")
var
i, s, n: integer;
p: real;
begin
p : = 1;
n : = 0;
i : = 1;
while n < 10 do
begin
if i mod 6 = 0 then
begin
p : = p * i;
inc(n)
end;
inc(i)
end;
writeln(p);
s : = 0;
n : = 0;
i : = 1;
while n < 25 do
begin
if i mod 7 = 0 then
begin
s : = s + i;
inc(n)
end;
inc(i)
end;
writeln(s)
end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
porotnikova0304.11.2022 15:32
-
Адил55518.07.2020 02:32
-
kirirllermakov22.08.2021 21:53
-
Zhaksyldi19.07.2022 17:42
-
математик21820.05.2023 22:02
-
rusakovwn24.10.2021 04:28
-
vpuzerov10.12.2021 00:00
-
yana102815.01.2022 05:02
-
peterDIYanov27.07.2020 06:40
-
али42129.09.2020 13:22
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.