В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
никотян7
никотян7
02.03.2021 08:18 •  Информатика

Среди приведённых ниже трёх чисел, записанных в различных системах счисления, найдите минимальное и запишите его в ответе в десятичной системе счисления. В ответе запишите только число, основание системы счисления указывать не нужно. 4516, 1208, 1001012.
Хелп

Показать ответ
Ответ:
Egor24690
Egor24690
27.11.2020 00:33
// PascalABC.NET 3.1, сборка 1172 от 19.02.2016
begin
  var m:=ReadInteger('число строк ');
  var n:=ReadInteger('число столбцов ');
  var a:array[,] of real; SetLength(a,m,n);
  Randomize;
  var p:=1.0;
  for var i:=0 to m-1 do begin
    for var j:=0 to n-1 do begin
      a[i,j]:=89*Random+10;
      Write(a[i,j]:0:5,' ');
      if j mod 2=0 then p*=a[i,j]
      end;
    Writeln
    end;
  Writeln(p)
end.

Тестовое решение:
число строк  4
число столбцов  3
83.48215 49.40392 38.47974
79.95518 85.86098 19.45080
34.86908 65.25898 51.15671
96.59641 24.22868 42.34227
36449203938146.9
0,0(0 оценок)
Ответ:
яналапа
яналапа
08.05.2020 15:36

1)

a) (X = Y) И (Y = Z)

б) ((X = Y) И (Y != Z))  ИЛИ ((X = Z) И (Z != Y)) ИЛИ ((Y = Z) И (Z != X))

!= - "не равно"

в) (X > 0) И (Y > 0) И (Z > 0)

г) ((X > 0) И (Y > 0) И (Z < 0)) ИЛИ ((X > 0) И (Y < 0) И (Z > 0)) ИЛИ ((X < 0) И (Y > 0) И (Z > 0))

(X*Y*Z>0) И (X<0 ИЛИ Y<0 ИЛИ Z<0)

д) (X < Y) И (Y < Z)

2)

а) (X = Y) and (Y = Z)

б) ((X = Y) and (Y <> Z))  or ((X = Z) and (Z <> Y)) or ((Y = Z) and (Z <> X))

в) (X > 0) and (Y > 0) and (Z > 0)

г) ((X > 0) and (Y > 0) and (Z < 0)) or ((X > 0) and (Y < 0) and (Z > 0)) or ((X < 0) and (Y > 0) and (Z > 0))

(X*Y*Z > 0) and ((X < 0) or (Y < 0) or (Z < 0))

д) (X < Y) and (Y < Z)

0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота