Предмет: Информатика,
автор: NatashkaJ
Подсчитать сумму и произведение первых N натуральных чисел
Ответы
Автор ответа:
0
===== PascalABC.NET =====
begin
var (s, p) := (0, BigInteger.One);
for var i := 1 to ReadInteger('N=') do
(s, p) := (s + i, p * i);
Println('Сумма', s);
Println('Произведение', p)
end.
Приложения:
NatashkaJ:
А можно без ридинтэджер и бигинтэджер? Мы это не изучали...
Ну дак,кхм,не подумала
Ох,можно я создам новый вопрос?Просто мне реально срочно...
https://znanija.com/task/34714519
Интересные вопросы
Предмет: Українська мова,
автор: диана454
Предмет: Русский язык,
автор: unknow95
Предмет: Русский язык,
автор: gasha18
Предмет: География,
автор: арт183