<span>Основные этапы развития вычислительной техники Самая популярная классификация предлагает выделить основные этапы развития вычислительной техники по хронологическому принципу: Ручной этап. Он начался на заре человеческой эпохи и продолжался до середины XVII столетия. В этот период возникли основы счёта. Позднее, с формированием позиционных систем счисления, появились приспособления (счёты, абак, позднее - логарифмическая линейка), делающие возможными вычисления по разрядам. Механический этап. Начался в середине XVII и длился почти до конца XIX столетия. Уровень развития науки в этот период сделал возможным создание механических устройств, выполняющих основные арифметические действия и автоматически запоминающих старшие разряды. Электромеханический этап – самый короткий из всех, какие объединяет история развития вычислительной техники. Он длился всего около 60 лет. Это промежуток между изобретением в 1887 году первого табулятора до 1946 года, когда возникла самая первая ЭВМ (ENIAC). Новые машины, действие которых основывалось на электроприводе и электрическом реле, позволяли производить вычисления со значительно большей скоростью и точностью, однако процессом счёта по-прежнему должен был управлять человек. Электронный этап начался во второй половине прошлого столетия и продолжается в наши дни. Это история шести поколений электронно-вычислительных машин – от самых первых гигантских агрегатов, в основе которых лежали электронные лампы, и до сверхмощных современных суперкомпьютеров с огромным числом параллельно работающих процессоров, способных одновременно выполнить множество команд. Этапы развития вычислительной техники разделены по хронологическому принципу достаточно условно. В то время, когда использовались одни типы ЭВМ, активно создавались предпосылки для появления следующих. - Читайте подробнее на SYL.ru: </span><span>https://www.syl.ru/article/169938/new_istoriya-razvitiya-vyichislitelnoy-tehniki-otechestvennaya-vyi...</span>
Простая задача, держи:
var a,b,c,d,n,j:integer;
begin
writeln('Стоимость монитора');
readln(a);
writeln('Стоимость системного блока');
readln(b);
writeln('Стоимость клавиатуры');
readln(c);
writeln('Стоимость мышки');
readln(d);
writeln('Сколько компьютеров нужно?');
readln(n);
j:=(a+b+c+d)*n;
writeln('Стоимость ', n, ' компьютеров = ',j);
end.
Что то криво сюда вставляется из Эклипса. Вот , прикрепил
Программа без шапки
Read(a);
Read(b);
C:=a*b;
If c<0 then
Begin
c:=c*2;
Writeln(c);
End;
Else
C:=c*1.5;
Writeln(c);
End.
------------
Реестр символов не учитывать
//PascalABC.Net 3.1.0.1200
begin
var a := ArrRandomInteger(25, 0, 100);
Println(a);
end.