М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
niznaika8888888888
niznaika8888888888
11.01.2022 00:40 •  Информатика

9. Для какого из приведённых имён ложно высказывание: НЕ (Первая буква гласная) ИЛИ НЕ (Последняя буква согласная)?
1) Арина
2) Владимир
3) Раиса
4) Ярослав

👇
Ответ:
Alisa27Alisa
Alisa27Alisa
11.01.2022

Для того, что бы найти решение нужно найти имя, в котором НЕ: первая буква не гласная или последняя буква не согласная:

1) Арина <== Первая буква - гласная, последняя - не согласная; ответ не подходит.

2) Владимир <== Первая буква - не гласная, вторая - согласная; ответ не подходит.

3) Раиса <== Первая буква - не гласная, последняя - не согласная; не ответ подходит.

4) Ярослав <== Первая буква - гласная, последняя - согласная; ответ подходит.

ответ: 4) Ярослав
4,4(5 оценок)
Открыть все ответы
Ответ:
ераврлга
ераврлга
11.01.2022
// PascalABC.NET 3.3, сборка 1633 от 10.02.2018
// Внимание! Если программа не работает, обновите версию!

№1

begin
  var x:=ReadReal('x=');
  var y:=Sqr((1-x*x+5*Sqr(x*x)));
  Writeln('y=',y)
end.

Пример
x= 4.12
y=2029704.2032886

2a.
 
begin
  var x:=ReadReal('x=');
  var t1:=x*x; // x^2
  var t2:=t1*t1; // x^4
  t2:=t2*t2; // x^8
  t1:=t2*t1; // x^10
  Writeln('x^10=',t1)
end.

2b.

begin
  var x:=ReadReal('x=');
  var t:=x*x; // x^2
  t:=t*t; // x^4
  t:=t*t; // x^8
  t:=t*t; // x^16
  t:=t/x; // x^15
  Writeln('x^15=',t)
end.
4,7(60 оценок)
Ответ:
моника59
моника59
11.01.2022
// PascalABC.NET 3.3, сборка 1633 от 10.02.2018
// Внимание! Если программа не работает, обновите версию!

begin
  var (m,n):=ReadInteger2('Количество строк и столбцов в матрице:');
  Writeln('*** Матрица A ***');
  var a:=MatrRandom(m,n,10,99); a.Println(3);
  var b:=new integer[m,n];
  var c:=new integer[m,n];
  for var i:=0 to m-1 do
    for var j:=0 to n-1 do
      (b[i,j],c[i,j]):=(a[i,j] div 10,a[i,j] mod 10);
  Writeln('*** Матрица  B ***'); b.Println(3);  
  Writeln('*** Матрица  C ***'); c.Println(3);
  Writeln(3*n*'-');
  Writeln('Количество нулевых элементов в С: ',
    c.ElementsByRow.Where(t->t=0).Count);
  var (sb,sc):=(b.ElementsByRow.Sum,c.ElementsByRow.Sum);
  Writeln('Сумма всех элементов матрицы B: ',sb);
  Writeln('Сумма всех элементов матрицы C: ',sc);
  if sb>sc then Writeln('Сумма элементов матрицы B больше')
  else
    if sc>sb then Writeln('Сумма элементов матрицы C больше')
    else Writeln('Суммы элементов матриц B и С равны')
end.

Дана некоторая матрица a размером, причем все ее элементы являются двухзначными числами. из цифр каж
4,5(70 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ