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

От перемены мест слагаемых сумму слегка покоробило». даны три целочисленные переменные. надо вычислить частное от деления произведения двух первых переменных на третью переменную. для этого предложены три разных перем m, n, k: integer; 1) m*n/k; 2) m/k*n; 3) n/k*m. являются ли эти эквивалентными? если нет, то в чем разница?

👇
Открыть все ответы
Ответ:
оскар4444
оскар4444
11.08.2021

1) n = 16

2) m = 180

3) a = 26

4) a = 22

5) b = 1

Объяснение:

1)

v := 1 // v = 1

n := 24 // n = 24

v := n - v * 4 // 24 - 1 * 4 ⇒ v = 20

n := v * 2 - n // 20 * 2 - 24 ⇒ n = 16

n = 16

2)

k := 3 // k = 3

m := 30 // m = 30

k := m - k * 3 // 30 - 3 * 3 ⇒ k = 21

m := k * 10 - m // 21 * 10 - 30 ⇒ m = 180

m = 180

3)

a := 4 // a = 4

b := 9 // b = 9

b := 6 * b - a // 6 * 9 - 4 ⇒ b = 50

a := b / 5 * 3 - a // 50 / 5 * 3 - 4 ⇒ a = 26

a = 26

4)

a := -12 // a = -12

b := 14 - a / 2 // 14 - (-12) / 2 ⇒ b = 20

b := (b - a) / 8 // (20 - (-12)) / 8 ⇒ b = 8

a := b * 2 + 6 // 8 * 2 + 6 ⇒ a = 22

a = 22

5)

a := 7 // a = 7

b := 2 // b = 2

a := b * 4 + a * 3 // 2 * 4 + 7 * 3 ⇒ a = 29

b := 30 - a // 30 - 29 = 1

b = 1

4,8(39 оценок)
Ответ:
Var
  a,b,c,x,y:real;
begin
  Write('Введите a и b: '); Read(a,b);
  repeat
    Write('Введите c, не равное нулю: ');
    Read(c)
  until c<>0;
  x:=2*sqr(a)-b/(3*c);
  {
  Если Вы относитесь к людям, ненавидящим скобки
  и тех, кто решает Ваши задания, то в Вашем условии
  на 3а делится все выражение, и тогда предыдущая строка
  должна иметь вид x:=(2*sqr(a)-b)/(3*a);
  }
  if x>=0 then
  begin y:=sqrt(x+sqr(c))+4*a*b; Writeln('x=',x,', y=',y) end
  else
    Writeln('x=',x,', y вычислить нельзя, под корнем отрицательное значение')
end.

Тестовое решение:
Введите a и b: 3.4 -2.18
Введите c, не равное нулю: 0
Введите c, не равное нулю: 5.172
x=23.2605001288992, y=-22.5762191684909
4,4(85 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ