var
x, f : real;
begin
write('введите x=');
readln(x);
if x < 3 then f := ln(abs(2-x))
else if (x >= 3) and (x < 5) then f := x/(x-2)
else f := sqrt(x-4);
writeln('f=', f);
end.
Держи ))) удачи )))
var x, y, d: real;
begin
read(x,y);
d := sqrt( sqr(x) + sqr(y) ); {находим длину отрезка от центра координат}
if d <= 1 then
writeln('Входит в Д1')
else if ( x >= 2 ) and ( x <= 3 ) and ( y >= 0 ) and ( y <= 1 ) then
writeln('Входит в Д2')
else
writeln('Не входит');
end.
В римской системе из левого большего числа вычитается правое меньшее.
XLCDM
X- 10
L-50
C-100
D-500
M-1000
Получается из M-D-C-L-X= 1000-500-100-50-10=340
Ответ- 340
3кБ=3072б (3*1024)
ответ 3072 байта делим на количество символов12288
равно 0.25 байт