Опубликовано 13.06.2017 по предмету Информатика от Гость >> <<

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