Переменная — это именованная область памяти для хранения данных, которые могут изменяться в процессе исполнения программы.Переменная характеризуется:Именем («обозначением ячейки памяти»)Значением (данными, содержащимися в переменной в конкретный момент времени)Типом (определяющим: а) какие значения может принимать переменная; б) какие операции можно производить с этими значениями; в) как данные представлены в памяти компьютера)<span>Имена и типы переменных указываются в разделе описаний и не могут изменяться в процессе выполнения программы.</span>
Var a:byte;
begin
write ('<span>x+y=a+b');
end.</span>
Маловато баллов за такую задачку.
Var z:array[1..16] of integer; k:array[1..16] of real; i,p,s:integer; max:real;
Begin
randomize;
for i:=1 to 16 do z[i]:=random(101);
write('Z=');
for i:=1 to 16 do write(z[i],' ');
writeln;
writeln;
p:=0;
s:=0;
for i:=1 to 16 do
if (i mod 2)<>0 then
begin
s:=s+z[i];
p:=p*z[i];
end;
writeln('P=',p);
writeln('S=',s);
writeln;
for i:=1 to 16 do k[i]:=z[i]*<span>exp(ln(i*z[i])/3);
</span>write('K=');
for i:=1 to 16 do write(k[i]:0:0,' ');<span>
max:=k[1];
for i:=1 to 16 do
if k[i]>max then max:=k[i];
writeln;
writeln('max=',max:0:0);
for i:=1 to 16 do
if k[i]=max then k[i]:=0;
write('K=');
for i:=1 to 16 do write(k[i]:0:0,' ');
End.</span>
Var a,b : Integer;
Begin
Readln(a,b);
Writeln('Ср.арифм. = ',(a+b)/2);
end.
Для элементарных логических функций с двумя переменными если значение переменных истина, то и результат будет истина.
Ответ: 1