Написать на pascal.
рассчитать y=x^2+1.8, при заданном x.
k=
sin y, при y< 10
tg y, при > 20
y^2, при 10< = y < = 20
wawking86rus
1
22.12.2019 23:59
1
Другие вопросы по теме Информатика
H3RURG
20.09.2019 05:10
joker9494
20.09.2019 05:10
GiftOfDeath
20.09.2019 05:10
Katykazazaeva
20.09.2019 05:10
Kfhjrhnf
20.09.2019 05:10
daniil539
30.12.2020 12:48
meloo1
30.12.2020 12:56
TwistChanel
11.12.2020 22:12
IBRAGIM058
11.12.2020 22:13
Популярные вопросы
- Укажите род,склонение,число,падеж у слова вафли. ; 3...
1 - Подумай и напиши в какой жизнен ой ситуации уместно будет употребить выражение...
1 - Попробуйте классифицировать по значимости причины революций 1989-1991 в странах...
3 - Стих i am happy you are my teacher э...
1 - 15 запиши слова в три столбика. в первый столбик - слова мужского рода в...
2 - Почему модэ шанной говорил земля основа государства...
2 - На диаграмме представлены некоторые из крупнейших по площади территории стран...
2 - На мельнице смололи 7500 кг пшеницы.из каждых 5кг пшеницы получились 4 кг...
2 - Найти сумму двадцати первых членов арифметической прогрессии , если а1 =...
2 - Преобразуй обыкновенную дробь 1/2, 1/4 в десятичную дробь...
3
PascalABC.NET
begin
var x := ReadReal('x =');
var y := x * x + 1.8;
var k: real;
if y < 10 then
k := Sin(y)
else if y > 20 then
k := Tan(y)
else
k := y * y;
Print(k)
end.