Предмет: Информатика,
автор: ksen4425
Найдите сумму 5 первых натуральных чисел ,больше 100,и кратные 123 ПАСКАЛЬ !!!!!
Аноним:
Программа? Посчитать? А зачем тогда алгебру учат в школе?
Я же не могу сказать это своему информатику )
Можете.
Программы пишут, когда посчитать невозможно или сложно, или долго.
А это просто сумма арифметической прогрессии.
Это задача информатика ! Тут нужно составить программу для вычисления...
Хорошо...вот Вам программа
// PascalABC.NET 3.4.2, сборка 1837 от 11.10.2018
// Внимание! Если программа не работает, обновите версию!
begin
SeqGen(5, i -> 123 * i, 1).Sum.Println
end.
// Внимание! Если программа не работает, обновите версию!
begin
SeqGen(5, i -> 123 * i, 1).Sum.Println
end.
Ок СПАСИБО
Пожалуйста. Все равно 1845 получится))
Ответы
Автор ответа:
2
Program n1;
var sum,i: integer;
begin
sum:=0;
for i:=1 to 5 do sum:=sum+123*i;
write(sum);
end.
var sum,i: integer;
begin
sum:=0;
for i:=1 to 5 do sum:=sum+123*i;
write(sum);
end.
Похожие вопросы
Предмет: Қазақ тiлi,
автор: dzetybaevdias
Предмет: Математика,
автор: ulianafilonik2009
Предмет: Алгебра,
автор: KTOOOOOOOOO
Предмет: Математика,
автор: Alinohka5000
Предмет: Алгебра,
автор: vikapochopko