Уклавы на 2 конфеты больше, чем у марины, а у зины на 2 конфеты меньше, чем у марины. как сделать так, чтобы у всех конфет стало поровну?

забрать 1конфету у клавы и дать эту 1 конфету зине

var  a, i, count, s: integer; begin  repeat    if(i = 100) then break;     readln(a);     if(abs(a) > 300) then begin      writeln('число по модулю не может быть > 300.');       continue    end    else if(a mod 9 = 0) and (a < > 0) then begin      inc(count);       s : = s + a;     end;     if(a < > 0) then inc(i);   until(a = 0);   writeln('среднее арифметическое: ', s / count); end.

интернет-телефония.

      интернет-телефония дает возможность пользователю интернета использовать телефонную связь компьютер-телефон, компьютер-компьютер и телефон-компьютер.

    провайдеры интернет-телефонии обеспечивают такую связь с специальных телефонных серверов интернета, которые подключены и к интернету, и к телефонной сети.  мобильный интернет.

  с   мобильного телефона на компьютер, подключенный к интернету, и с компьютера на мобильный телефон можно отправлять sms .

  как то так