Запиши программу на языке Паскаль для:
y = {0, если x ≤ 0
{x, если 0 < x ≤ 1
{x², если x > 1
(y:3:0)
Запусти программу и введи значение x = 13
cucuruza5
1
22.04.2020 14:03
2
Другие вопросы по теме Информатика
nlimel
18.10.2019 18:38
JoyGames14982
18.10.2019 20:27
ghcfgnyhvjt
11.10.2019 17:25
вопрос65378
11.10.2019 17:22
EkimovaVlada
11.10.2019 17:22
Помогу111111156946
27.09.2019 19:30
Nimfa48
27.09.2019 19:30
narutoluffi1
27.09.2019 19:30
nvel1999
20.05.2021 17:11
нур821
20.05.2021 17:08
Популярные вопросы
- Почему меня кидают друзья?...
2 - Якою півкулею буде повернута до Сонця Земля,коли в Україні полудень...
2 - Ойланайық 1. Сөзжұмбақты шеш.Оқи2332Көлденеңінен:1. Шаштараз құралы2....
3 - ли вам чтение книг стать грамотным?...
1 - Позиция обоснование пример следство молчалина...
2 - 492. 1. Прочитайте. Накресліть схеми речень, виділивши слова, що...
3 - Put the verbs in brackets into the Present,Past or Future Simple...
1 - Установіть відповідність між пейзажем і внутрішнім станом ліричного...
3 - Как меняется природа весной после дождя...
1 - Найдите первый член арифметической прогрессии аn если а21 = - 57,4...
2
program ggvfgg;
var
x, y: real;
bool: boolean;
begin
readln(x);
begin
if x <= 0 then
y := 0 end ;
begin
if x < 1 then
y := x end ;
begin
if x > 1 then
y := sqr(x) ;
end;
writeln(y: 3: 0);
end.