помогите с написанием программы в паскале
5-9 класс
|
var x,y:real;
begin
readln(x);
if x<3 then y:=x+3;
if (-3<=x) and (x<=0) then y:=sqrt(9-x*x);
if (0<x) and (x<6) then y:=-0.5*x+3;
if x>=6 then y:=x-6;
writeln('y=',y);
end.
Другие вопросы из категории
1. Для каждого из указанных подмножеств назовите множество, с которым оно связано отношением «является разновидностью» (назовите общее имя, отвечающее на вопрос «Что это такое?»): а) местоимение;
б)запятая;
в) джойстик;
г) параллелограмм;
д) ратуша;
е) басня;
ж) капилляр.
Читайте также
1) Если а>7, то найти сумму BC, иначе найти разность.
2) Определить квадрат числа, если оно положительное, но если отрицательное - куб.
3) Идет К-ая секунда суток. Напечатать сколько полных часов, минут и секунд прошло к данному моменту.
4) В магазине продается костюмная ткань. Ее цена В рублей за квадратный метр. Напишите программу, которая подсчитает и выведет на экран стоимость куска этой ткани, длиной Х метров и шириной 80 см.
Если дано трехзначное число, например 123 его можно представить в виде 3+2*10+1*10*10. Воспользовавшись этой информацией, создайте программу, которая, получая от пользователя трехзначное число, будет определять из каких цифр оно состоит и выводить их через пробел (например, 1_2_3).
Напечатать таблицу перевода 1,2,…, 20 долларов США в рубли по текущему курсу (значение курса вводится с клавиатуры).