Вопрос, который вызвал трудности

Вводится число программ N<=10. Напечатать фразу "Я разработал N программ", согласовав слово "программа" с числом N. Предусмотреть ситуацию ввода N<0.<br>
Буду благодарен. Решение через case of

Ответ экспертов Учись.Ru

Чтобы дать полноценный ответ, был привлечён специалист, который хорошо разбирается в теме.

После обсуждения с другими специалистами сервиса мы пришли к выводу, что правильный ответ на ваш вопрос будет звучать следующим образом:

Не уточнили язык - получите паскаль. Мог бы сделать на С++ 

program Znanija;
var n,i:integer;
begin

readln(n);

if n < 0 then 
begin

writeln('Я не разработал программ');
exit;

end;


write('Я разработал ', n, ' ');

case n of
1:writeln('программу');
2..4:writeln('программы');
0,5..10:writeln('программ');
end;

end.