Из чисел от 10 до 99 вывести те, сумма цифр которых равна S — QBasic(Бейсик)

INPUT "S=",S
FOR i=10 TO 99
IF i\10+i MOD 10 =s THEN PRINT i;" ";
NEXT i

Тестирование выполнено в программе QB64 ( Скачать )

Leave a Comment