Дано натуральное число b и n целых чисел. Верно ли, что сумма данных целых чисел не превышает b.

Дано натуральное число b и n целых чисел. Верно ли, что сумма данных целых чисел не превышает b.
Гость
Ответ(ы) на вопрос:
Гость
var   b, n, s, a: integer; begin   readln(b, n);   for i: integer := 1 to n do   begin     readln(a);     s += a;   end;   writeln(b >= s ? 'Yes' : 'No'); end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы