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

1. даны действительные числа x и y. найти из них максимальное. 2. даны два действительных числа. вывести первое число, если оно больше второго, и оба числа, если это не так.

👇
Ответ:
гость66666
гость66666
08.01.2022
Var
  x,y:real;
begin
  Read(x,y);
  if x>y then then Writeln(x) else Writeln(y); { задание 1 }
  if x>y then Writeln(x) else Writeln(x,' ',y) { задание 2 }
end
4,8(47 оценок)
Ответ:
ЕхоBts97
ЕхоBts97
08.01.2022
1)
CLS
DIM A AS REAL
DIM B AS REAL
INPUT A
INPUT B
IF A>B THEN
  PRINT A
ELSE
  PRINT A
  PRINT B
END IF

2)
CLS
DIM A AS REAL
DIM B AS REAL
IF A<=B THEN
  A=O
END IF
PRINT A
PRINT B
  
4,4(55 оценок)
Ответ:
КлешВова
КлешВова
08.01.2022
Для сравнения чисел между собой исп. функция ЕСЛИ.
Чтобы вывести оба числа (получается, они как бы превращаются в одно число?) - исп. функция Сцепить.
Вместо 1 число, 2 число, можешь написать Х, У. 

Вообще, очень похоже, что эту задачу задавали для решения на языке программирования, а не в электронных таблицах. В программировании обычно в начале описывают, какого типа входные данные. Здесь они действительные, т.е. тип real.
Даны два действительных числа x и y. вывести первое число, если оно больше второго, и оба числа если
4,8(55 оценок)
Открыть все ответы
Ответ:
butterfly31
butterfly31
08.01.2022

1. Для наглядности построй в столбик значения двойки в степенях от 0 до 7. Это будет 1, 2, 4, 8, 16, 32, 64, 128.

2. Разложи число (Внимание! Обязательно только из десятичной системы счисления) на числа из построенного ранее столбика.

К примеру возьмем число 37. 37=32+4+1.

2. Отсчитывай от числа из столбика 128 до 1. Если в разложении имеется это число, то пиши 1. Иначе 0.

0(128 нету) 0(64 нету) 1(32 есть!) 0(16 нету) 0 1 0 1

Цифр должно получиться восемь. Лучше пересчитать на случай, если случайно забыл ряд.

То есть по этому алгоритму 37_{10}=00100101_{2}.

И, конечно же, пробуй переводить числа самостоятельно. Сухая теория тут не имеет места.

4,4(85 оценок)
Ответ:
maksimiksanov
maksimiksanov
08.01.2022
1)uses crt; var  x,a,b,c,i: integer;     begin cls;   write('введите число: '); readln(x);     a: = x div 100;     b: = (x - a*100) div 10;     c: = (x - a*100 - b*10);     if (a=b) or (a=c) or (b=c) then    writeln('есть одинаковые цифры')    else    writeln('одинаковых цифр нет'); end.2)uses crt; var  x: real;     begin cls;   write('сумма покупки: '); readln(x);     if x> 1000 then x: =x-(x*0.1);     writeln('стоимость с учётом возможной скидки ',x); end.
4,4(88 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ