Известно, что из четырех чисел a1, a2, a3, a4 одно отлично от трех других, равных между собой. найдите это число. Решить задачу на языке Паскаля. - №11245815

Известно, что из четырех чисел a1, a2, a3, a4 одно отлично от трех других, равных между собой. найдите это число. Решить задачу на языке Паскаля.
- Предмет:
  Информатика
- Автор:
  backbone
- 6 лет назад

Ответы 1

var a1,a2,a3,a4:real;begin readln(a1,a2,a3,a4);if (a1<>a2) and (a1<>a3) then writeln(a1);if (a2<>a1) and (a2<>a3) then writeln(a2);if (a3<>a1) and (a3<>a2) then writeln(a3);if (a4<>a3) and (a4<>a2) then writeln(a4);end.
- Автор:
  aliagood
- 6 лет назад
- 0
Добавить свой ответ

Еще вопросы

[tex] \int\limits {(x^7+4x)} \, dx,[/tex][tex] \int\limits {(4x^3-15x^2+14x-3)} \, dx ,[/tex][tex] \int\limits{ \frac{(3x+1)^2}{x} } \, dx , [/tex][tex] \int\limits { \frac{2+x^2}{x} } \, dx , [/tex][tex] \int\limits {(4x+3)^2} \, dx , [/tex][tex] \int\limits {(3x-8)} \, dx , [/tex][tex] \int\limits {(2*3sinx)} \, dx , [/tex][tex] \int\limits {(2x^2-cosx)} \, dx ,[/tex][tex] \int\limits {( \frac{3}{sin^2x} } + \frac{1}{x}) \, dx ,[/tex][tex] \int\limits { \frac{dx}{cos^22x} } \, ,[/tex][tex] \int\limits {sin3x} \, dx , [/tex][tex] \int\limits { \frac{3x^6-4x^5-7x^4+3x^2}{x^4} } \, dx [/tex]
- Предмет:
  Математика
- Автор:
  joannapij4
- 6 лет назад
- Ответов:
  
  1
- Смотреть
Найдите все значения р, при каждом из которых прямые у=р^2 * x+p-8 и y=4x-6 не имеют общих точек.
Срочно помогите, пожалуйста. Экзамен завтра, а решить не могу.
- Предмет:
  Математика
- Автор:
  sloanekey
- 6 лет назад
- Ответов:
  
  6
- Смотреть
а) х-10\7=4\3 б) 6\7= у-1,2\5 в) 8\у-2= 5\6
- Предмет:
  Математика
- Автор:
  eliezer
- 6 лет назад
- Ответов:
  
  0
- Смотреть
3 м 54 см=?м Как перевести и с объяснением пожалуйста
- Предмет:
  Математика
- Автор:
  gordo
- 6 лет назад
- Ответов:
  
  5
- Смотреть

How much to ban the user?

1 hour 1 day 100 years