PascalABC.net
var x,y:real;
begin
write('Введите x: ');
readln(x);
if (x>=-2) and (x<=-1) then y:=2*x+4;
if (x>-1) and (x<=1) then y:=2*x*x;
if (x>1) and (x<=2) then y:=-2*x+2;
if (x<-2) or (x>2) then
writeln('Функция не определена')
else writeln('f(x)=',y);
<span>end.</span>
3D-принтер.
3D-принтер — это периферийное устройство, использующее метод послойного создания физического объекта по цифровой 3D-модели. 3D-печать может осуществляться разными способами и с использованием различных материалов, но в основе любого из них лежит принцип послойного создания (выращивания) твёрдого объекта.
Не совсем понимаю вопроса.
div - это целое значения после деления одного числа на другое
mod - это остаток от деления одного числа на другое
т.е. например
a:=7 div 2;
a=3
b:=7 mod 2;
b=1
Примеры использования div и mod могут быть разные. Например их можно использовать для деления числа на отдельные цифры. Так остаток от деления на 10 (a mod 10) даст нам последнюю цифру. А если для трёхзначного числа зададим (a div 100) то найдём его первую цифру. Так же для нахождения средней цифры в трёхзначном числе можно написать как ((a mod 100)div 10) так и ((a div 10)mod 10).
Так же с помощью mod можно находить количество цифр в числе, и программа будет выглядеть так:
var i:byte; a,k:integer;
a:=4873; k:=0;
while a>0 do begin
k:=k+1;
a:=a mod 10;
end;
writeln(k);
end.
Знаем что такое двоичная система? Так вот с помощью div и mod можно написать программу перевода числа в двоичную систему, или просто подсчитать количество нулей и единиц в двоичной записи числа. Подсчёт единиц и нулей выглядит так:
var a,b,c:integer;
a:=34;b:=0;c:=0;
while a>0 do begin
if a mod 2=0 then b:=b+1 else c:=c+1;
a:=a mod 10;
end;
writeln('количество нулей=',b);
writeln('количество единиц=',c);
end.
Вообще много чего можно придумать. Узнать чётное ли число(mod), узнать количество чётных и нечётных цифр в числе(mod), узнать сколько раз число a делиться на число b(mod и div).
Так div и mod можно использовать где угодно и как угодно, и всё зависит от фантазии человека который пишет программу. Единственное что надо помнить, что mod и real выполняются для чисел integer, и если мы попытаемся исполнить операции для real (например 3,4 или 6,7) то наткнёмся на ошибку. Ну а так же, чисто из математики, мы не можем делить на ноль, следственно (a div 0) тоже операция не выполнима так же как и (a mod 0) .
<span>ОС - это операционная система, например Windows XP или Windows Vista, это базовая программа которая поволяет работать на ПК а также набор стандартых прог и утилит</span>
<span>var
a, b, c, P: real;
begin
writeln('Введите два катета:');
readln(a, b);
P := a + b;
c := sqrt(sqr(a) + sqr(b));
P := P + c;
writeln(' c = ', c:0:2);
writeln(' P = ', P:0:2);
end.</span>