<span>Текст,записанный с использованием 64 символьного алфавита состоит из 52 символов.То обьем текста равен 3 328 бит</span>
Для какого из приведённых имён истинно высказывание:
<span>НЕ((Первая буква согласная) ИЛИ (Последняя буква гласная))? </span>
1) Иван
2) Семён
3) Никита
4) Михаил
Пояснение.
Для того, чтобы высказывание было истинным, необходимо, чтобы выражение в скобках было ложным. Логическое «ИЛИ» ложно, когда ложны оба высказывания. Следовательно, первая буква имени должна быть гласной, а последняя − согласной. Таким условиям удовлетворяет только имя «Иван».
См приложен
разработать базу данных...
<span> Техника - создание чертежей
наука - Создание моделей каких либо
реклама - создание изображений на банерах, плакатах
сфера развлечений - реклама какого либо развлечения
медицина - ренген
производство - создание чертежей, проектов планов
обучение - Создание каких либо чертежей, графических моделей</span>
Program abc;
Const
n=3;
m=3;
Var a:array[1..n,1..m] of integer;
b,y,i,j,sum:integer;
srd:real;
Begin
Writeln('Введите числа массива: ');
For i:=1 to n do
For j:=1 to m do
Begin
Write('a[',i,',',j,']= ');
Readln(a[i,j]);
if a[i,j]>0 then
begin
sum:=sum+a[i,j];
inc(b);
end
else
If a[i,j]<0 then
Inc(y);
End;
If sum>0 then
begin
srd:=sum/b;
Writeln('Среднее =',srd);
end
else
Writeln('Нет положительных членов массива');
If y>0 then
begin
Writeln('Количество отрицательных элементов =',y);
end
else
Writeln('Нет отрицательных членов массива');
End.