Коля готовился к контроль ной по .всего ему было задано решить n .каждый день коля решал различное количество ,успел ли он решить все если до контрольной оставалось k дней. в паскале решить по языку программирования..
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.
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.