var
money , cost , i:integer;
begin
read(money); // Стартовые деньги
for i := 1 to 5 do begin
read(cost); //Ввод цены предмета
money := money - cost;
end;
if(money < 0) then
write('No')
else
write('Yes');
end.
Объяснение:
var
money , cost , i:integer;
begin
read(money); // Стартовые деньги
for i := 1 to 5 do begin
read(cost); //Ввод цены предмета
money := money - cost;
end;
if(money < 0) then
write('No')
else
write('Yes');
end.
Объяснение: