Var n:integer;
Begin
Read(n);
while (n>0) do begin
if(n mod 2 = 1) then begin
writeln(true);
exit;
end;
n := n div 10;
end;
writeln(false);
End.
Так как количество лилий с каждым днём становилось в 2 раза больше, то для заполнения половины пруда понадобилось 10-1 = 9 дней.
К десятому дню выросло 1*2=2*2=4*2=8*2=16*2=32*2=64*2=128*2=256*2=512*2=1024 лилий.
Объяснение:
1.4-8, 5-3, 8-4
2. 2 и 4 -не высказывания
Высказывание – некоторое повествовательное утверждение, про которое можно однозначно сказать ("сразу посмотрев на него"), истинно оно или ложно
3. 3 переменных, 8 строк в таблице,
1) или \/ 2) инверсия скобок 3) конъюнкция "и" (&)
4.
5. ответ (4)
6. F=A&В\/неВ
АВ-F: 00-1, 01-0, 10-1, 11-1
Пять бит степень двойки берем с избытком 2 в пятой 32
//Паскаль
var i,n:integer;
a:array[1..20] of integer;
begin
n:=0;
randomize;
//заполняем рандомом
for i:=1 to 20 do
a[i]:=random(20);
//считаем, если елемент массива равен шести то увеличиваем переменную n на еденицу
for i:=1 to 20 do
if a[i]=6 then Inc(n);
Writeln('Кол-во шестерок ' , n);
end.<span>
</span>