Дано натуральное число 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.
Не нашли ответ?
Похожие вопросы