Как сделать чертежь в кумире буква ю​

мы просим пользователя ввести какое то А, и какое то В.

После чего мы в А записываем:

А = То число что ввёл пользователь + второе число что ввёл пользователь

у В мы записываем

В = берём то она, что у нас получилось чуть выше и минус В которое ввёл пользователь.

Тут опять

А = то А, что было выше - В которое мы тоже получили чуть выше.

И выводим эти числа

Пример

Пользователь ввёл что А = 4, В = 3

Значит

А = 4+3 = 7

В = берём нашу 7 и - 3 = 4

А = 7(наше А, которое мы посчитали в 1 примере) - 4(наше В, которое выше) = 3

Выводим

А = 3

В = 4

1)

var

  str : string;

begin

  readln (str);

  writeln (length (str) - pos (':', str));

end.

2)

var

  str, s : string;

  count, i : integer;

begin

  readln (str);

  s := copy (s, pos ('(', str) + 1, pos (')', str) - pos ('(', str) - 1);

  count := 0;

  for i := 1 to length (s) do

    if s[i] = ' ' then inc (count);

  writeln (count + 1);

end.

3)

var

  str : string;

  count : integer;

begin

  readln (str);

  count := 0;

  while pos (',', str) > 0 do

  begin

    inc (count);

    delete (str, pos (',', str), 1);

  end;

  writeln (str);

  writeln (count);

end.

Сделано без проверки на соответствие условию.