Ученик принес k конфет в класс. он хочет раздать все конфеты поровну между n одноклассников, но конфет может не достаться всем в равном количестве. некоторым ученикам достанется на 1 меньше. напишите программу, которая вычислит скольким ученикам достанется на 1 конфету меньше

вводные данные: на первой строке число n, количество учеников в классе. второе число k, количество конфет, которые ученик принес в класс.

выходные данные: одно значение, количество учеников, которым достанется на 1 конфету меньше.

смотря какая передача и каких данных, много чего придумать можно, мне кажется) телефон, радио, модем,рация. или просто- передатчик.

var a: integer;

begin

writeln ('vvedite nomer mesuaca');

read (a);

if (a=1) then writeln ('30');

if (a=2) then writeln ('28');

if (a=3) then writeln ('30');  

  if (a=4) then writeln ('31');  

  if (a=5) then writeln ('30');  

  if (a=6) then writeln ('31');  

  if (a=7) then writeln ('30');  

  if (a=8) then writeln ('31');  

  if (a=9) then writeln ('30');  

  if (a=10) then writeln ('31');  

  if (a=11) then writeln ('30');  

  if (a=12) then writeln ('31');  

end. 

var a,b,c,d,e: real;

begin

  read(a,b,c,d);

  e: =(a+b+c+d)/4;

  writeln(e: 0: 4);

end.

поскольку http: \\ftp. не бывает, то ftp: \\schools.ru\program.exe