Можно при вводе фильтровать что вводится, если число не удовлетворяет требованиям оно игнорируется
var a: array[1..10] of integer;
n,c,i:integer;
inp : real;
begin
readln(n);
i:=1;
repeat
readln(inp);
c := round(inp);
if (inp = c) and (inp >= 0.0) and (inp <1001.0) then
begin
a[i]:= c;
i:=i+1;
end;
until(i=n+1);
c:=0;
for i:= 1 to n do
if a[i] < n then
c:= a[i]+c;
writeln(c);
end.
Первое поколение – вычислительные машины на электронных лампах (1945-1955 гг.). Первой действующей ЭВМ 1-го поколения стал ENIAC (США, 1945 - 1946 гг.). Его название по первым буквам соответствующих английских слов означает «электронно-числовой интегратор и вычислитель».
ЭВМ 2-го поколения были разработаны в 1955—1965 гг. В качестве основного элемента были использованы уже не электронные лампы, а полупроводниковые диоды и транзисторы, а в качестве устройств памяти стали применяться магнитные сердечники и магнитные барабаны - далекие предки современных жестких дисков.
Примеры машин третьего поколения — семейства IBM—360, IBM—370, ЕС ЭВМ (Единая система ЭВМ), СМ ЭВМ (Семейство малых ЭВМ) и др. Быстродействие машин внутри семейства изменяется от нескольких десятков тысяч до миллионов операций в секунду. Ёмкость оперативной памяти достигает нескольких сотен тысяч слов.
Четвертое поколение ЭВМ: После 1975 года. Элементная база ЭВМ – большие и сверхбольшие интегральные схемы (БИС, СБИС), где в одном кристалле размещалось несколько десятков тысяч электрических элементов. Начиная с 1980 года практически все ЭВМ стали создаваться на основе микропроцессоров.
На каждый пиксель отводилось log2(256)=8бит
В ЧБ на один пиксель 1 бит
Размер уменьшился в 8 раз
Тогда исходный файл был 80 байт.