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

Question

Информатика

Юлиания

25 сентября, 08:31

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

+5

Ответы (1)

Знаете ответ?

Павлинка · Answer 1

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.