Коля готовился к контроль ной по математике.всего ему было задано решить N задач.каждый...

Question

Коля готовился к контроль ной по математике.всего ему было задано решить N задач.каждый день Коля решал различное количество задач,успел ли он решить все задачи если до контрольной оставалось K дней.помогите в паскале задачу решить по языку программирования..

Answer 1

Var n,k,p,pr,i:integer;
begin;
readln(n);
readln(k);
for i:=1 to k do
 begin;
  readln(p);
  pr:=pr+p;
 end;
if pr>=n then writeln('Y') else writeln('N');
end.