Номер 1
Определите значения переменных s и i после выполнения фрагмента программы:
s:=0;
i:=5:
while i>0 do
begin
s:=s+i;
i:=i-1;
end;
Выберите верное:
1. s=15, i=0
2. s=0, i=-1
3. s=15, i=5
4. s=5, i=0

Номер 2
В алгоритме, записанном ниже используются действительные переменные a и b .
Определите значение переменной b после выполнения алгоритма:

a := 5;
a := 2*a-3;
b := 12-21/a;
b := 3*b-a;

Порядок действий соответствует правилам арифметики. В ответе укажите одно число - значение переменной b.

резец

Объяснение:

Дано:

i = 2 байта

I = 112 бит = 14 байт

Найти:

K

I = K * i

K = I / i

K = 14 / 2 = 7 символов (удалили из сообщения)

Т.к. при вычёркивании названия были удалены ставшие лишними запятая и пробел (2 символа), то слово состояло из

7 - 2 = 5 символов

Название одного из орудий в тексте из 5 символов (букв) - резец

I = K * i

I - информационный объём текстового сообщения (размер файла, содержащего сообщение)

K - количество символов в сообщении

i - информационный вес одного символа (число бит, используемых для записи одного символа)

1 байт = 8 бит

uses GraphABC;

var

 p:array[0..7]of Point;

begin

 p[0].x := 100; p[0].y := 50;

 p[1].x := 200; p[1].y := 150;

 p[2].x := 200; p[2].y := 200;

 p[3].x := 100; p[3].y := 400;

 p[4].x := 150; p[4].y := 200;

 SetBrushColor(rgb(100,100,100));

 Polygon(p[0],p[1],p[2],p[3],p[4]); // хвост

 p[0].x := 200; p[0].y := 150;

 p[1].x := 200; p[1].y := 200;

 p[2].x := 300; p[2].y := 250;

 p[3].x := 500; p[3].y := 250;

 p[4].x := 550; p[4].y := 200;

 p[5].x := 550; p[5].y := 150;

 p[6].x := 500; p[6].y := 100;

 p[7].x := 300; p[7].y := 100;

 SetBrushColor(rgb(200,200,200));

 Polygon(p[0],p[1],p[2],p[3],p[4],p[5],p[6],p[7]); // тело

 p[0].x := 300; p[0].y := 100;

 p[1].x := 350; p[1].y := 50;

 p[2].x := 500; p[2].y := 100;

 SetBrushColor(rgb(100,100,100));

 Polygon(p[0],p[1],p[2]); // верхний плавник

 p[0].x := 300; p[0].y := 250;

 p[1].x := 350; p[1].y := 300;

 p[2].x := 500; p[2].y := 250;

 SetBrushColor(rgb(100,100,100));

 Polygon(p[0],p[1],p[2]); // нижний плавник

 SetBrushColor(rgb(0,0,0));

 rectangle(550,150,560,200); // рот

 SetBrushColor(rgb(70,70,70));

 circle(500,150,10); // внешний круг глаза

 SetBrushColor(rgb(0,0,0));

 circle(500,150,5); // внутренний круг глаза

end.