Создать алгоритм для решения следующей задачи: у Иванова есть 100 р., он пошел в магазин за книгой. Если нужная ему книга стоит дороже 100 р., то он вернется домой, а если дешевле 100 р. или ровно 100 р., то купит её. (Какой тип и вид алгоритма вы используете?). Начертите блок-схему

1) ра, ии, та (тэ) и ро (эр). в египетском языке слово «рот» звучало как «эр», и они стали иероглифом обозначать не только слово «рот», но и согласный звук «р». точно так же иероглиф «хлеб» употреблялся для обозначения звука «т», потому что по-египетски «хлеб» — «тэ», и так далее. 2) в египетском письме более семисот иероглифов. 3) в древнем египте наряду со значками , обозначавшими целые понятия и слова, существовали и другие знаки, обозначавшие слоги и даже отдельные звуки . потребность в таких знаках очевидна, так как не все можно выразить в виде изображений (прежде всего, это касается личных имен). в этих случаях египтяне превращали слова иероглифы в буквы иероглифы, из которых и составлялись слова, подлежащие передаче на письме согласно их звучанию. например иероглиф «хт» — изображение дома — сделался двухбуквенным иероглифом, обозначающим звук [хт], иероглиф «мн» — изображение шахматной доски — стал иероглифом, обозначающим два звука [мн] и т.д. на первых порах значение фонетических иероглифов было , но со временем их роль все более возрастала, и в последние века существования египетской письменности значение фонетических иероглифов стало господствующим. но к чисто фонографическому письму (то есть такому, где каждый знак обозначает отдельный звук или букву) египтяне так и не перешли . это важное усовершенствование было сделано в письме других народов. 4) вообще-то, само понятие иероглиф не подразумевает передачу каких либо букв или звуков, они "значение" слова. это не алфавит или азбука, а набор знаков для записи определенных понятий, т.е. слов целиком хотя, в иероглифических системах существуют знаки для передачи именно одной буквы или слога 5) лингвисты того времени не знали как могут звучать какой то конкретный иероглиф и является ли он "буквой" или же обозначает целое понятие. после находки розеттского камня, с текстами на 3х языках (древнеегип-м, египетском (демотическое письмо) и древнегреческом) шампальон начал изучать его и сопоставлять тексты друг другу. отыскав имена правителей (александра, клеопатры выяснил, что иероглифы являются как бы "буквами", т.е. имеют какое то чтение, пишутся в основном согласные, хотя некоторые гласные (а, и также присутствуют. некоторые иероглифы читаются одним звуком, а некоторые двумя или тремя 6) египтяне, как и некоторые другие народы, не писали гласных. поэтому после слова, написанного звуковыми знаками, ставился определитель - знак, поясняющий читающему общее значение слова. например, иероглиф, напоминающий "яму с водой", обозначал в одном случае слово “колодец”, в другом – сочетание двух согласных “хм”, а в третьем тот же знак не читался, а лишь подсказывал, что речь в тексте идет о воде - прудах, болотах и т.п.

512 бит = 512/8=  64 байт

1073741824 байт =1073741824/1024=1048576 кбайт / 1024= 1024 мбайт

1024 кбайт = 1024*1024=1048576 байт

4

дискета 3,5 = 720 кбайт

сd= 650 мбайт

dvd= 1,4 гбайт- 17,08гбайт

жесткий диск = до 5 тбайт (терабайт)

5

30 кбайт= 30*1024 = 30720 байт

125 кбайт  =  125* 1024 =128000 байт

1024 кбайт = 1024* 1024 = 1048576 байт

71 кбайт = 71 * 1024 = 72704 байт

13 гбайт = 13*1024=13312мбайт=13312*1024=13631488кбай= 13631488 * 1024 = 13958643712байт

9216 байт = 9216/1024 = 9 кбайт

32 гбайт = 32*1024*1024=33554432 кбайт

769мбайт = 769*1024 = 787456 кбайт

512 байт = 512 /1024 = 0,5 кбайт

70254592 байт = 70254592/1024/1024=67 мбайт

42 гбайт = 42*1024= 43008 мбайт

20482 кбайт = 20482/1024 = 20мбайт

2 гбайт =2*1024=2048 мбайт 

1)

var

i,k: integer;

a: array [1..14] of integer;

begin

k: =0;

for i: =1 to 14 do

begin

a[i]: =random(46)-15;

write(a[i]: 3);

if a[i] mod 2=0 then k: =i;

end;

if k> 0 then

begin

for i: =k to 13 do a[i]: =a[i]+1;

a[14]: =0;

end;

writeln;

for i: =1 to 14 do write(a[i]: 3);

end.

2)

var

i,k: integer;

a: array [1..14] of integer;

begin

for i: =1 to 14 do

begin

a[i]: =random(46)-15;

write(a[i]: 3);

end;

for i: =1 to 7 do

begin

k: =a[i];

a[i]: =a[i+7];

a[i+7]: =k;

end;

writeln;

for i: =1 to 14 do write(a[i]: 3);

end.