Найдите ошибки в записи программы. перепишите программу в исправленном виде. program умножение; var a, b, c: boolean; begin read (a, b) c = a * b writeln (произведение введенных вами чисел равно , c) end.

Надо бы указывать - какой используется компилятор. вариант программы, который должен работать со всеми версиями паскаля: program prog; var a, b, c: integer; begin readln (a, b); c : = a * b; writeln ('произведение введенных вами чисел равно ', c); end.

Строчка "program умножение; " спорная т.к. некоторые компиляторы поддерживают кириллицу, например pascalabc, но лучше использовать буквы. "var a, b, c: boolean; "  boolean - это логический тип переменных true false, либо 0 1, для других чисел не подходит. я остановился на типе "real", чтобы можно было вводить не только целые числа, но и дробные, например 2,5 после каждого оператора необходимо ставить "; ", кроме того, что перед "end" там ставить не обязательно. в паскале "=" используется как оператор сравнения, а оператор присваивания выглядит так: ": =", поэтому исправим тут ошибку  "c = a * b" текст в "writeln()"  пишется в одинарных кавычках, исправляем ошибку " writeln (произведение введенных вами чисел равно , c)"и так вот готовая исправленная программа program multi; var a,b,c: real; begin     read(a,b);     c: =a*b;   writeln('произведение введенных вами чисел равно ',c) end.

1) чтобы точно вынуть черный, нужно вынуть 6 шаров, т.к. первые 5 могут оказаться белыми

2)аналогично, 4 шара

3)7 шаров

4)5 шаров

для 4 символов:

2*2*2*2=16

 

для 5 символов:

2*2*2*2*2=32 

 

для 6 символов:

2*2*2*2*2*2=64

 

16+32+64=112