Дано натуральное число b и n целых чисел. Верно ли, что сумма данных целых чисел не превышает b.
Ответы
Ответ дал:
0
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.
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.
Ответ дал:
0
Не запрещается никакими правилами ходить во фраке по стройке, но если это станет делать рабочий, это назовут (мягко) выпендрежом.
Похожие вопросы
2 года назад
7 лет назад
10 лет назад
10 лет назад
10 лет назад