Опубликовано 10.06.2017 по предмету Информатика от Гость >> <<

Определим как горка целое положительное трёхзначное число x для которого выполняется следующие условия сумма первой и последней цифры равна средней цифре язык Qbasic

Ответ оставил Гость

Получим 45 трехзначных чисел
CLS 
N = 1 
FOR i = 1 TO 9 
FOR j = 0 TO 9 
FOR k = 0 TO 9 
IF i + k = j THEN 
PRINT N; i * 100 + j * 10 + k  N = N + 1 
END IF 
NEXT k 
NEXT j 
NEXT i
Программа выдает 45 таких чисел