Их различия это цвета, форма и размеры
Если я не ошибаюсь "end" здесь вообще не нужно)
18:3=6 рожков 6-5=1 рожок остался на столе 18-3=15 стаканчиков осталось на столе
131(10)=10000011(2)
63(10)=111111(2)
255(10)=11111111(2)
Я не стану выбирать С++ - это все же язык для решения совсем иных задач.
<h3>PascalABC.NET 3.4.2, сборка 1864 от 11.11.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
begin
var a := ArrRandom(9, -50, 50);
a.Println;
a.Fill(t -> 1);
a.Println
end.
<h2>1 3 17 -6 -22 19 -1 -29 -20</h2><h2>1 1 1 1 1 1 1 1 1</h2>