помогите составить программу в паскале - Компьютерные вопросы

Вопрос помогите составить программу в паскале

Регистрация
23 Окт 2013
Сообщения
81
Репутация
-3
Спасибо
0
Монет
0
Записи числа N равного *2* две цифры пропущены, восстановите их, если известно, что сумма цифр числа равна 8
 
Регистрация
28 Ноя 2013
Сообщения
86
Репутация
-3
Спасибо
0
Монет
0
vаr  i, j:Intеgеr; bеgin  fоr i := 0 tо 9 dо   fоr j := 0 tо 9 dо    if (2 + i + j = 8) thеn     WritеLn(20 + j + 100 * i);  RеаdLn; еnd.
 
Регистрация
24 Май 2013
Сообщения
97
Репутация
0
Спасибо
0
Монет
0
Помогаю. Для удобства делаем функцию, которая считает сумму цифр числа, найти даже готовую не проблема, ибо задача типовая Ну а затем в цикле перебираем трехзначные числа и для каждого используя функцию смотрим чему равна сумма. Если 8 то останавливаем цикл и выводим число на экран
 
Сверху Снизу