Помогите решить вопрос по языку программирования Pascal Проверить тождество :...

0 голосов
39 просмотров

Помогите решить вопрос по языку программирования Pascal
Проверить тождество : 1+2+3+…+n=n*(n+1)/2.


Информатика (193 баллов) | 39 просмотров
Дан 1 ответ
0 голосов
Правильный ответ

// PascalABC.NET 3.3, сборка 1611 от 06.01.2018
// Внимание! Если программа не работает, обновите версию!
begin
var n:=ReadInteger();
write(range(1,n).Sum()=n*(n+1)/2);
end.

(150k баллов)