Var x, i: integer;
a: array [0..9] of integer;
begin
for i := 0 to 9 do
begin
readln(a[i]);
if (a[i] < 0) then x := x + a[i];
end;
writeln(x);
<span>end.
Вот так это сделать можно)</span>
1.
var x: real;
begin
readln(x);
if (x>=-4)and(x<4) then writeln('y = ',sqrt(x*x+4))
else writeln('Функция не определена');
end.
Пример:
2
<span>y = 2.828427124746190e+00
2.
var x: real;
begin
readln(x);
if (x>=-4)and(x<4) then
begin
if x*x-4>=0 then writeln('y = ',sqrt(x*x-4))
else writeln('Корень из отрицательного числа');
end
else writeln('Функция не определена');
end.
Пример:
0.5
<span>Корень из отрицательного числа</span></span>
поровоз вроде!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
Растровое изображение — изображение, представляющее собой сетку пикселей — цветных точек (обычно прямоугольных) на мониторе, бумаге и других отображающих устройствах.
Важными характеристиками изображения являются:
Размер изображения в пикселях — может выражаться в виде количества пикселей по ширине и по высоте (800×600px, 1024×768px, 1600×1200px и т. д.) или же в виде общего количества пикселей (так изображение размером 1600×1200px состоит из 1 920 000 точек, то есть примерно 2 мегапикселя);
Количество используемых цветов или глубина цвета (эти характеристики имеют следующую зависимость: {\displaystyle N=2^{k}}, где {\displaystyle N} — количество цветов, {\displaystyle k} — глубина цвета);
Цветовое пространство (цветовая модель) — RGB, CMYK, XYZ, YCbCr и др.;
Разрешение изображения — величина, определяющая количество точек (элементов растрового изображения) на единицу площади (или единицу длины).
