Запиши программу на языке паскаль для: y = {0, если x ≤ 0 {x, если 0 < x ≤ 1 {x², если x > 1 (y: 3: 0) запусти программу и введи значение x = 6 я не , !
pollyyyyyyyyyyy
1
26.05.2019 09:09
2
Другие вопросы по теме Информатика
Volovoy00T
25.05.2020 10:43
mohammadroshann
19.10.2021 16:52
ваноумно
19.10.2021 16:48
irynks468dig
19.10.2021 16:45
Иван66665
19.10.2021 16:44
irinaantipina
27.09.2020 11:53
1HM
27.09.2020 11:53
vladd010703
07.06.2019 10:00
трум1
27.09.2019 12:20
Популярные вопросы
- Какое место в обществе занимали сарматские женщины нужнл...
3 - Кроссворд по биологии на тему Растения и животные Красной книги Ульяновской области...
3 - дам 1️⃣5️⃣ 1400. Запишите уравнение прямой, если известны коэффициенты a, bисвободный...
2 - Дано промені ОА і ОВ зі спільним початком у точці О та промінь О1А1. Побудуйте промінь...
2 - Заполните таблицу очень нужно не знаю как заполнить...
2 - I Hнді оқы.шайқасадыМіне, қызык!Бұғылы» дегорман бар. Көл 120МӘТІНМЕН ЖҰМЫСтаза....
2 - До ть будь ласка потрібно вставити слова по темі the lord of the rings...
1 - Цена груш — р. за 1 кг, а цена яблок — р. за 1 кг. Запиши в виде выражения: стоимость...
3 - Определите вид химической связи. Напишите схемы образования связей. N2; NH3; BaO;...
3 - Используя карту атласа с. 10 или другую любую физическую карту мира выписать названия...
1
36
Код программы:program raf105;
var
x,y: real;
begin
write('x = ');
readln(x);
if x <= 0
then y:= 0;
if (0 < x) and (x <= 1)
then y:= x;
if x > 1
then y:= power(x,2);
writeln('y = ',y:3:0);
end.
PascalABC 3.4.2