Составить программу для решения данной задачи в Паскале

Приложения:

Ответы

Ответ дал: gravityspeed
0

Var i,N:integer;

begin

Read(i,N);

N:=N-i;

Write(N);

end.



Если i это количество белых шаров, а N общее количество шаров то вот так

Похожие вопросы