Напишите программу в Паскаль! Посчитать сумму всех целых чисел от 1 до 100…

Question

34

Напишите программу в Паскаль! Посчитать сумму всех целых чисел от 1 до 100 включительноSn=(2a1+d(n-1)*n) /2

в избранное ссылка

Знаете ответ?

vicktori · Accepted Answer

40

vicktori

02 марта 2023

const a=1; d=1; n=100; var s: real; begin s: =(2*a+d*(n-1) /2*n; writeln ('Сумма числер равна ',s); end.

комментировать

в избранное ссылка отблагодарить