<span>b. Для того чтобы число делилось на 2, достаточно, чтобы оно было четным
</span><span>d. Для того чтобы число делилось на 3, достаточно, чтобы сумма его цифр </span>
Ты же ей не параметр передаёшь, а зачем-то поставил знак умножения, вот компилятор и ругается.
Проверка финансово-хозяйственной деятельности за определенный период времени
Var
s: biginteger;
n,i: int64;
ar:array of int64=(9,90,900,9000,90000,900000,9000000,90000000);
begin
i:=1;
read(n);
while n-ar[i-1]>=0 do
begin
s:=s+(ar[i-1]*i);
n:=n-ar[i-1];
i:=i+1;
end;
if(n>0)then
begin
s:=s+(n*i);
end;
write(s);
end.
По данной схеме составим логическую функцию:
F= A * B + not A + C, упрощаем
F= not A + B +C,
строим таблицу истинности:
Таблица во вложении: