<span>Архитектуру компьютера разработали в 1943 году Джон Преспер Экерт и Джон Уильям Мочли, учёные из Университета Пенсильвании. В отличие от созданного в 1941 году немецким инженером Конрадом Цузе комплекса Z3, использовавшего механические реле, в ЭНИАКе в качестве основы компонентной базы применялись вакуумные лампы. Всего комплекс включал 17468 ламп, 7200 кремниевых диодов, 1500 реле, 70000 резисторов и 10000 конденсаторов. Потребляемая мощность — 150 кВт. Вычислительная мощность — 300 операций умножения или 5000 операций сложения в секунду. Вес - 27 тонн. Вычисления производились в десятичной системе. </span>
Var a, b: real;
begin
write('Введите первое число = ');readln (a);
write('Введите второе число = ');readln (b);
writeln(a,' * ',b,' = ',a*b);
writeln(a,' + ',b,' = ',a+b);
end.
Условие:В Блокнот (Notepad) введён текст: осень. Нам необходимо вычислить информационный объём данного текста. Помним, что один символ текста занимает 1 байт. Значит, информационный объём данного текста равен: <span>1байт⋅5=5байтов</span>. Занимаемый объём на флэш - диске: <span>32<span> Кбайт</span></span>, т.к. <span>на флэш-диске используется файловая система FAT16, и этот файл будет занимать один кластер, объём которого равен 32 Кбайт.</span>
Const n=7;
var a:array[1..n] of integer;
i,s:integer;
begin
Randomize;
for i:=1 to n do
begin
a[i]:=random(50);
write(a[i]:4);
end;
writeln;
s:=0;
for i:=1 to n do
if a[i] mod 7 <> 0 then s:=s+a[i];
writeln('s = ',s);
end.
Пример:
26 37 12 38 21 45 19
s = 177