Составить программу вычисления значения функции:
perrybazinga
2
26.05.2019 12:30
0
Другие вопросы по теме Информатика
Vladislava256
29.08.2019 07:20
эма24
29.08.2019 07:20
irinavardanyan
29.08.2019 07:20
вампир982
07.02.2022 20:36
ayydarhan
17.05.2019 12:00
Gladiolus94
17.05.2019 10:54
киви1403
17.05.2019 12:00
Iist
20.07.2019 16:00
lari133
20.07.2019 16:00
Ава2370
20.07.2019 16:00
Популярные вопросы
- Все числительные от 1 до 100 какие букввстрецаются в этом списке...
3 - 1. автомобиль прикладывает к прицепу такую же силу, как и прицеп...
1 - Врайоне города новгорода, согласно пвл , проживало племя кокое племя?...
3 - Найти определитель матрицы как ка решать? ! напишите решение!...
2 - Решить 20 в ответе нужны и числа и буквы (2d+c^2)⋅(4d^2−2dc^2+c^4)...
1 - За 7/20 ткани заплатили 1 2/5 тыс. рублей. сколько стоят 2 1/4 м...
3 - Дополните рассказ пропущенными словами: из моря вытащили бутылку...
3 - Как решить : я провёл год в деревне, москве и дороге. в москве я...
1 - Примеры нестехиометрических веществ()...
2 - Кнаибольшему общему знаменателю и изобразите на координатном луче...
2
program raf105;
var x,y: real;
begin
write('x = ');
readln(x);
if x <= 0
then y:= power(x,2) - 0.3;
if (0 < x) and (x <= 1)
then y:= 0;
if x > 1
then y:= power(x,2) - x;
writeln('y = ',y);
end.
PascalABC 3.4.2