Для какого из приведённых имён истинно высказывание:
<span>НЕ((Первая буква согласная) ИЛИ (Последняя буква гласная))? </span>
1) Иван
2) Семён
3) Никита
4) Михаил
Пояснение.
Для того, чтобы высказывание было истинным, необходимо, чтобы выражение в скобках было ложным. Логическое «ИЛИ» ложно, когда ложны оба высказывания. Следовательно, первая буква имени должна быть гласной, а последняя − согласной. Таким условиям удовлетворяет только имя «Иван».
<span>вновь созданный слайд размещается
</span><span>3 После текущего слайда. </span>
Const
N = 20;
var
a: array [1..N] of integer;
k: integer;
begin
k := 0;
for var i := 1 to N do
begin
a[i] := Random(41) - 20;
if a[i] < 0 then k := k + 1;
write(a[i]:4);
end;
writeln;
writeln('Отицательных: ', k);
end.
Var x,y : real; b:boolean;
begin
write('x = '); readln(x);
write('y = '); readln(y);
b:= (x*x+y*y<=36)and((x<=0)or(x>=0)and(y<=0));
writeln(b);
<span>end.</span>
var i,n,p:integer;
a:array[1..10000] of integer;
begin
p:=1;
readln(n); {Вводится количество элементов массива}
for i:=1 to n do begin readln(a[i]); p:=p*a[i]; end; {Вводится каждый элемент массива и умножается на произведение ранее введённых}
writeln(exp(ln(p)/n)); {Вывод среднего арифметического - корень степени n из произведения всех элементов массива}
end.