Дано натуральное число n составить программу нахождения суммы всех чисел от 1 до n.…

Question

88

Дано натуральное число n составить программу нахождения суммы всех чисел от 1 до n. Решить задачу изпользуя цикл REPEAT, заранееспасибо)

категория: информатика

ответить

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

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

booster · Accepted Answer

52

booster

26 февраля 2023

vari, n,l: integer; beginwrite ('Введите число: '); readln (n); i: =1; repeatl: =l+i; inc (i); until i > n; write ('Сумма всех чисел равна: ', l); end.

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

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

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: