1. Информатика
  2. Запиши программу на языке

Запиши программу на языке Паскаль для:
{0, если x≤0
y= {x, если 0 {x2,если x>1
Запусти программу и введи значение x=10

Amana95 Amana95    3   19.04.2020 17:17    0

Ответы
тупойученик129 тупойученик129  13.10.2020 11:58

var x,y:real;

begin

write('Введите x: ');

readln(x);

if (x<=0) then y:=0

else if (x<=1) then y:=x

else y:=x*x;

writeln(y:3:0);

end.


Запиши программу на языке Паскаль для: {0, если x≤0 y= {x, если 0 {x2,если x>1 Запусти программу
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
kostja07 kostja07  24.04.2020 12:21
Если фрагмент поместить в буфер обмена, то сколько раз его можно вставить в текст ? А)один Б)это зависит от количества строк в данном фрагменте В)столько раз, сколько потребуется...
Iliawer Iliawer  24.04.2020 12:21
Для представления 1 мин фильма на экране монитора с разрешением 1366 х 768 и палитрой из 256 цветов потребуется: 1) 960 Мбайт 2) около 960 Кбайт 3) около 1024 Кбайт 4) 983...
Misaki59 Misaki59  24.04.2020 12:21
Описать класс для работы с одномерным массивом: - конструктор, заполняющий заданное в его параметре количество элементов массива квадратами натурального ряда чисел, знак числа...
ааnell714 ааnell714  03.07.2019 11:30
Втаблице запросы к поисковому серверу. расположите номера запросов в порядке убывания количества страниц, которые найдет поисковый сервер по каждому запросу. для обозначения...
aminka0095 aminka0095  13.05.2020 18:16
Любая информация сохраненная под определенным именем во внешней памяти называется...
LegendYT LegendYT  13.05.2020 18:17
НУЖНО ЗАДНИЕ ПО ИНФОРМАТИКЕ СКОЛЬКО У МЕНЯ ЕСТЬ Опишите последовательность создания трехмерной модели, изображенной ниже, в программе SketchUp. В качестве ответа напишите названия...
TheEasyCloud TheEasyCloud  13.05.2020 18:17
ОЧЕНЬ ОЧЕНЬ нужно перевести код с Pascal в Python var n, x:longint; c,c1,k:byte; begin read(n); x:=n; while n 9 do n:=n div 10; c1:=n; k:=0; repeat c:= x mod 10; if c=c1 then...
FrozeFre FrozeFre  17.04.2019 02:20
Что представляют собой гены с точки зрения биохимика?...
Lera096811hk Lera096811hk  17.04.2019 02:20
В каком случае закон независимого наследования признаков несправедлив?...
nyusha1990 nyusha1990  17.04.2019 02:20
В чём сущность закона независимого наследования признаков?...

Популярные вопросы