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

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