1 2 3 4 5 6 | INPUT "vvedite summu ", q DO n = n + 1 q = q - n LOOP UNTIL q <= 0 PRINT n |
Тестирование выполнено в программе QB64 ( Скачать )
1 2 3 4 5 6 | INPUT "vvedite summu ", q DO n = n + 1 q = q - n LOOP UNTIL q <= 0 PRINT n |
Тестирование выполнено в программе QB64 ( Скачать )