Вроде должно быть так:
program primer;
var a,b,x:integer;
y:real;
begin
write('Введите значение переменной A');
readln(a);
write('Введите значение переменной B');
readln(b);
y:=2.4*abs((sqr(x)+b)/a)+(a-b)*sqr(sin(a-b)+sqrt(10)(x-b);
wtite('Результат',y:6:2);
readln
<span>end.</span>
Компилятор -- компилирует программу в байт-код, а интерпретатор -- исполняет ее при помощи программы (интерпретатора). Достоинства компилятора в том, что что бы запустить скомпилированную программу не требуется специальной программы
Ответ на 1
/////////////
Ответ:Будет выведено число:1282.
Чему равны числа:
a = 12
b = 8
c = 2
x = 10
d = 1200
e = 80
r = 1282
Ответ на 3:
//////////////////
Ответ:Будет выведено число: 1202.8
Чему равны числа:
a =12
b =8
c =2
x =10
d =1200
e =0,8
r =1202,8
Sub MyMid()
a = Range("B3:B14")
n = UBound(a, 1)
s = 0
For i = 1 To n
s = s + a(i, 1)
Next i
Range("E3").Value = s / n
End Sub
<em><u>Можно и короче записать:</u></em>
Sub MyMid2()
Range("E3") = Application.WorksheetFunction.Average(Range("B3:B14"))
End Sub
Фотосъемка достопримечательностей относится к получению (сбору) информации.
Ниже можно не записывать, записал для понятности.
(Т.к матрица на фотоаппарате собирает пучки света на себя отправляя в процессор, процессор перерабатывает изображение в изображение .jpg)