НЕ (Вторая буква гласная) ИЛИ НЕ (Последняя буква согласная)
1. НЕ (true) ИЛИ НЕ (false) = true
2. НЕ (true) ИЛИ НЕ (true) = false
3. НЕ (false) ИЛИ НЕ (true) = true
4. НЕ (true) ИЛИ НЕ (true) = false
5. НЕ (false) ИЛИ НЕ (true) = true
Ответ: 2, 4.
<em>/ PascalABC.NET 3.2, сборка 1385 от 14.02.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
Writeln('Поквартирная численность жильцов');
var a:=ArrRandom(36,1,10); a.Println;
var mx:=a.Max;
Write('Квартиры с максимальным количеством жильцов: ');
a.Select((x,i)->(x,i)).Where(x->x[0]=mx).Select(x->x[1]+1).Println
end.
<u>Пример</u>
Поквартирная численность жильцов
7 9 6 7 8 9 1 4 7 8 8 8 1 7 7 8 3 10 7 7 2 9 7 3 2 8 2 2 10 4 4 5 2 1 7 1
Квартиры с максимальным количеством жильцов: 18 29
1.
A = 0,5; B = -1,7;
Так как A больше B, то идем по ветке "else":
B = A;
B = 0,5.
Ответ: A = 0,5; B = 0,5.
2. Так как "6" больше "16", то идем по ветке "then":
C = 5.
Ответ: 5.
3. Если между выражениями стоит "and", то они оба должны выполняться (1), если хоть одно из них ложно, то программа выдаст "ложь" (0).
При x = 5 первое выражение будет истинным, но во втором ложным, т.к. пять не больше пяти. Две скобки не истинны - значение выражения "ложь" (0).
Ответ: 0.
4. mod - остаток от деления.
abs - модуль числа.
Если между выражениями стоит "or", то при одной или двух истинных выражениях программа на выходе дает "истину" (1). Если обе скобки ложны, то программа возвращает "ложь" (0).
При делении 45 на 2, остатком от деления является 1, а не 0. Скобка считается ложной.
При abs (45) число вправду больше 35, начит скобка истинна.
В итоге логическое выражение принимает значение "1".
Ответ: 1.
5. (x <= 2) or (x > 15).
Or - или.
Var n:integer;
Begin
readln(n);
if n mod 2 =0 then writeln(n+2) else writeln(n+1);
end.
Var a,n,k: integer;
begin
write('vvedite chislo ');
readln(n);
if (n=1) or (n=0) then write( n, ' ne sostavnoe i ne ');
a:=2;
while a<=n div 2 do
begin
if n mod a=0 then k:=k+1;
a:=a+1;
end;
if k=0 then write('prostoe')
else writeln('sostovnoe');
<span>end.
P.S. Благодарность не помешает.</span>