Предмет: Информатика,
автор: Путятишна
Напишите программу в Паскаль!!
Посчитать сумму всех целых чисел от 1 до 100 включительно Sn=(2*a1+d*(n-1))*n)/2
Ответы
Автор ответа:
0
const a=1; d=1; n=100;
var s:real;
begin
s:=(2*a+d*(n-1))/2*n;
writeln ('Сумма числер равна ',s);
end.
Похожие вопросы
Предмет: История,
автор: nuraiTok
Предмет: История,
автор: Аноним
Предмет: Другие предметы,
автор: abprimzhanova
Предмет: География,
автор: kcenia13
Предмет: Математика,
автор: taniagrisha