Это так сложно??? Ну ладно. Короче. Монитор нужен чтобы видеть всё что происходить в компьютере. Клавиатура нужна чтобы вводить разную информацию, переписываться и т.д. Принтер нужен чтобы распечатать нужную тебе информацию. Динамик не очень обязательный, но может пригодится если будешь разговаривать по скайпу с родствениками, играть в игры и т.д. Мышь нужна чтобы открывать программы и также вводить разную информацию. Сканер нужен чтобы можно было от одной важной информации и сделать несколько. И самый важный, самый главный системный блок!!! Без его все перечисленные сейчас приборы будут безполезными! Это всё. Надеюсь тебе помгло. Удачи!
_____________________________
<em>// PascalABC.NET 3.3, сборка 1547 от 07.10.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
procedure Fib(var a,b:integer);
begin
(a,b):=(b,a+b)
end;
begin;
var (n,p,q):=(ReadInteger('n='),1,1);
var a:=ArrFill(n,1);
for var i:=3 to n do begin Fib(p,q); a[i-1]:=q end;
a.Println
end.
<u>Пример</u>
n= 13
1 1 2 3 5 8 13 21 34 55 89 144 233
А:=9 (a=9 Мы присвоили переменной а значение 9; b=0 Мы не присваивали значение b)
b:=a mod 5(a=9 Мы не изменяли значение a; b=4(Функция mod возвращает остаток от деления) Мы разделили a на b(9 на 5) и у нас получился остаток 4)
b:=b*10(a=9 Мы не изменяли значение a; b=40 Мы умножили значение b на 10 и результат присвоили переменной b)
a:=b div 5-3(a=5 Мы значение b(40) разделили на 5 и вычли 3; b = 40 Мы не изменяли значение b)
Вообщем:
a=9 b=0
a=9 b=4
a=9 b=40
a=5 b=40
<span>Один бит, один символ. </span>
<span>1200 бит/с 1200 символов/с </span>
<span>и т.д. </span>