написать программу на языке паскаль. Найдите значение K (значение переменных x,z задайте - №24193298

написать программу на языке паскаль.
Найдите значение K (значение переменных x,z задайте самостоятельно ).

*СРОЧНО НУЖНО НАПИСАТЬ ПРОГРАММУ!!!!!!!*
- Предмет:
  Информатика
- Автор:
  velasco
- 5 лет назад

Ответы 1

var k, x, z: real;begin readln(x); readln(z); if x > z then k := sqrt(2 * (x - z) / z); if x <= z then k := x + z; println(k);end.
- Автор:
  andrea9o6e
- 5 лет назад
- 0
Добавить свой ответ

Еще вопросы

Две строительные бригады должны проложить железнодорожные пути по 2240км каждая.Одна бригада может прокладывать за неделю 16 км пути , другая -14 км.На сколько недель одна бригада определит другую?
- Предмет:
  Математика
- Автор:
  bartkelly
- 5 лет назад
- Ответов:
  
  3
- Смотреть
Что делает Геракла героем? Сочинение. Помогите!!
- Предмет:
  Литература
- Автор:
  braniac
- 5 лет назад
- Ответов:
  
  1
- Смотреть
Математика 6 класс. Решите систему способом подстановки.
- Предмет:
  Математика
- Автор:
  zaniyah
- 5 лет назад
- Ответов:
  
  1
- Смотреть
решите ребусы:
' ' ' ' 'запрещено(к)
звонок ' '
хорошо ' ' '
картина ' ' '
к=м
мелок
л=ш
- Предмет:
  Право
- Автор:
  augusto
- 5 лет назад
- Ответов:
  
  1
- Смотреть

How much to ban the user?

1 hour 1 day 100 years