Есть ответ 👍

Вводится число программ n< =10. напечатать фразу "я разработал n программ", согласовав слово "программа" с числом n. предусмотреть ситуацию ввода n< 0. буду . решение через case of

112
306
Посмотреть ответы 2

Ответы на вопрос:


Не уточнили язык - получите паскаль. мог бы сделать на с++  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.

Var       m, n: integer;       k, d, s: real; begin       read(m, n, k, d);       repeat               d : = d - m * k + n * k / 2;               s : = s + m * k;       until d < = 0;       writeln(s); end.

Популярно: Информатика