1. «В 1725 году Базилем Бошо было впервые предложено использовать перфорированную ленту для управления
ткацким станком». Как данное использование связано с
информатикой?
2. По какому принципу ЭВМ делятся на поколения?
3. Назовите основные тенденции, прослеживаемые в
развитии вычислительной техники. ​

var

  x : array [1..15] of integer;

  i : integer;

  min : integer;

  kol_nol : integer;

begin

  kol_nol : = 0;

  for i: =1 to 15 do

  begin

  write ("введите элемент массива: ");

readln(x[i]);

end;

min : = x[1];

for i : = 0 to 15 do

begin

  if (x[i] > 0) then

  begin

  if (x[i] < min) then

  begin

    min : = x[i];

  end;

  end;

  if (x[i] = 0) then

  begin

  inc(kol_nol);

  end;

writeln(min);

writeln(kol_nol);

end;

я пробовала у меня вышло 15 но возможны и другие варианты

логика, морзе, вектор, шина, дек, рунет, железо, терно, юзер, каретка, адаптер, браузер, цифра, образ, плата, эталон, сектор(стокер), зерно, утилита, файл, гамма, щелчок, чистка, иконка, ядро, ершов, хаб, набор 

qbasic

? "введите число"

input a

a: 2=b

if b=int(b) then 1 else 2

1 ? "это число четное" : goto 3

2 ? "это число не четное" 

3 end