Известно что в учебнике по информатике 150 страниц на каждой странице 42 строчки в каждой строчке 50 символов сколько килобайт содержит книга если считать что 1кб=1000б?
Найдём количество символов в книге: 150*42*50=315000 символов. Один символ хранится в 8 битах, это 1 байт, т. е. нам надо 315000 байт, а это и есть 315 кб т. к. в 1 кб по условию 1000б(315*1000=315000)
var a: array[1..n, 1..n] of integer; i, j, aii: integer;
begin Randomize; Writeln('Исходный массив'); for i := 1 to n do begin for j := 1 to n do begin a[i, j] := Random(101) - 50; Write(a[i, j]:4) end; Writeln end; Writeln('Результирующий массив'); for i := 1 to n do begin aii:=a[i,i]; for j:=1 to n do begin if a[i,j]<aii then a[i,j]:=1 else a[i,j]:=0; Write(a[i,j]:4) end; Writeln end end.
Алгоритм это четкая последовательность действий для достижение результата.
Напрмер алгоритм для робота. Задача забить гвоздь. 1.выяснить куда забивать гвоздь 1.1 Выяснить на какую глубину. 2.Поставить метку где будет забит гвоздь 3.Выбрать гвоздь. 4.Выбрать молоток. (тут можно добавить оптимизацию, например выбирать только определенный молоток под определенный гвоздь) 5.Приставить острие гвоздя к месту куда будет забиваться гвоздь. 6.Зафиксировать гвоздь в этом положении 7.Ударить молотком по шляпке гвоздя 8.Повторять п.7 до тех пор пока гвоздь не будет забит до нужного состояния согласно п1.1. 9.Убрать молоток туда откуда был взят Конец
