Составьте на языке паскаль программу вычисления суммы всех натуральных чисел, не превышающих заданного натурального числа n. построить трассировочную таблицу
работает на 1000 элементов,нужно узнать диапазон n,элементы я так понял рандомные,если вводятся с клавиатуры то просто убираем randomize и пишем вместо присваивания (mas[i]: =random(19)-10; )пишем read(который в коментах)
label l;
var
mas: array[1..1000] of longint;
n,i: longint;
begin
readln(n);
randomize;
for i: =1 to n do
begin
mas[i]: =random(19)-10;
//read(mas[i]);
write(mas[i],' ');
end;
for i: =n-4 to n do
begin
if mas[i] > 0 then
begin
mas[i]: =mas[i]-2*mas[i];
goto l;
end;
if mas[i] < 0 then
mas[i]: =abs(mas[i]);
l:
end;
writeln;
for i: =1 to n do
write(mas[i],' ');
end.
как гласит , первый прототип современной мышки появился в 50-х годах прошлого века. клавиатуры гораздо более длинна и извилиста. она началась гораздо раньше самого компьютера – с изобретения печатной машинки.
мышки
как гласит , первый прототип современной мышки появился в 50-х годах прошлого века. создали его в рамках секретного военного проекта под названием datar (digital automated tracking and resolving system) канадские инженеры компании ferranti electric, которая имела контракт с канадскими вмс на разработку компьютеризованной радарной сети. системе, над которой они работали, требовалось устройство, с которого оператор мог перемещать точку на экране радара. решили эту два инженера-разработчика – том крэнстон и фред лонгстафф, создав так называемый трекбол, в котором в качестве шара был использован канадский шар для боулинга (в отличие от американского он более лёгкий и не имеет отверстий для пальцев). в ходе работ было сделано 9 подобных экспериментальных устройств. проект, малой частью которого и являлся трекбол, хоть и произвёл впечатление на военных, но денег для дальнейшего развития не получил (кстати, на проект в целом было потрачено около порядка 2 млн. долларов) и был "убран на полку". "изобретение трекбола опередило время", – сказал том крэнстон в одном из своих интервью газете toronto star weekly. а так как это был сверхсекретный проект, то более десяти лет о нём знали только в узком кругу военных, а инженеры не смогли запатентовать свою технологию.
клавиатуры
клавиатуры, в отличие от мышки, гораздо более длинна и извилиста. извилиста хотя бы потому, что клавиатуры развиваются до сих пор, и причём не в плане устройства или там, аппаратной начинки, а в плане удобства.
она началась гораздо раньше, чем собственно компьютера – с изобретения печатной машинки. и она гласит, что первая подобная машина была изобретена генри милом в 1714 году, то есть почти триста лет назад. однако никаких данных о её устройстве не сохранилось, как, впрочем, и самой машинки. вторая попытка создать машинку принадлежит итальянцу пеллегрино турри, который в 1808 году, почти сто лет спустя, изготовил машинку собственной конструкции. однако, как и в предыдущем случае, ни сам аппарат, ни информация о конструкции до наших дней не дожили. в последующие 60 лет было создано ещё несколько печатных устройств, однако большой популярности они не получили.
а вот в 1863 году уже появился предок всех современных печатных машин. изобрели её американцы кристофер лехтем шоулз (christopher sholes) и самуэль суле (samuel soule), что характерно, оба – бывшие типографы. правда, поначалу они придумали устройство для нумерования страниц в счётных книгах, но потом познакомились с карлосом глиденом, который подсказал им очевидную вроде бы идею – построить на этом же принципе машину, печатающую слова.
источник:
