A:= 4;
b:= 2;
b:= a/2*b = 4/2*2 = 4/4 = 1;
a:= 2*a+3*b = 2*4+3*1 = 8+3 = 11;
a = 11;
b = 1;
Устройства ввода - периферийное оборудование, которое отвечает за ввод/вывод данных или сигналов в ПК или из ПК.
<em>Примеры устройств для ввода информации:</em>
Сканер, микрофон, клавиатура, плата видеозахвата, графический планшет, компьютерная мышь, джойстик.
1 и 1 и 1 = 1 и 1 = 1 (истина)
Type LinMass = array [1..1000] of Integer;
<span>Var A : LinMass; N, i, j : Integer; </span>
begin
Write('Количество элементов массива: '); ReadLn(N);
For I := 1 To N Do
Begin
Write('Введите A[', I, '] '); ReadLn(A[i]);
End;
i:=1;
while i <= n do
if (A[i] mod 2 = 0) and (A[i] mod i = 0) and (A[i] div 1000 = 0) and (A[i] div 100 > 0)
then begin
for j:=i+1 to n do A[j-1]:=A[j];
n:=n-1
end
else i:= i+1;
For I := 1 To N Do
write(a[i]:6);
<span>end.</span>