№1
а) 101011111<span> + </span>111101<span> = </span>110011<span>100
б) </span>101011111 - 111101 = 100100010
в) 101011111<span> × 1</span>001<span> = </span>110001010<span>111
</span>№2
927 (10)<span> = 1</span>021100 (3) = 12202 (5) = 2463 (7) = 1<span>240 (9)
</span>№3
AC6 (16) - 432 (6) + 723 (9) - 444 (5) = AC6 (16) - A4 (16) + 24C (16) - 7C (16) = <span>BF2 (16)</span>
Исаак Ньютон, 17 век, Закон всемирного Тяготения, три закона механики
Антуан Лавуазье, 18 век, закон сохранения массы вещества.
Мария Кюри (совместно с Пьером Кюри) 20 век, исследование радиоактивности, открытие новых радиоактивных элементов - радия и полония
Чарльз Дарвин, 19 век, Теория естественного отбора
Георг Ом, 19 век, Закон Ома
Программа рабочая, скорее всего ты просто вводил элементы в строчку, а у тебя стоит в чтении переход на новую строку(окончание LN), и паскаль просто не видел никакие числа, кроме первого.
И очень муторный и непонятный код, я переписал немножко:
var
col, a: integer;
begin
col := 0;Read(a);
while a <> 0 do
begin
read(a);
if (a mod 3 = 0) and (a mod 2 = 0) then
col := col + 1;
end;
writeln('количество ', col);
end.
Пример:
6 12 9 36 0
количество 3
Рисунки, схемы, чертежи, фотографии