Кр. По информатике. . Расположите в правильном порядке номера строк программы. Какой будет ответ при вводе значение катета равным 4 ? Вычисление площади прямоугольного треугольника, имеющего равные катеты, по заданному катету: 1) s := a*a / 2; 5) Var a: integer; s: Real; 2) End. 6) Readln (a); 3) Program Treug; 7) Writeln (’s=’, s:6:2); 4) Writeln (‘Введите катет’:40); 8) Begin

35846172

Объяснение:

Program Treug;

Var a: integer; s: Real;

Begin

Writeln('Введите катет':40);

Readln (a);

s := a*a / 2;

Writeln ('s=', s:6:2);

End.

После ввода катета 4, будет выведен ответ: s=  8.00

35861472

Скореевсего верно!

Программа поиска элемента в произвольном массиве:
const n=10;
var a:array[1..n+1] of integer;
p,i:integer;
begin
Randomize;
writeln('Исходный массив:');
for i:=1 to n do
 begin
 a[i]:=random(21);
 write(a[i]:4);
 end;
writeln;
write('p = '); readln(p);
a[n+1]:=p;
i:=1;
while a[i]<>p do i:=i+1;
if i<=n
 then writeln('Искомый элемент найден, его номер = ',i)
 else writeln('Искомый элемент не найден');
end.

Пример 1:
Исходный массив:
   7  17  16  13   0   1  19  20  12   5
p = 13
Искомый элемент найден, его номер = 4

Пример 2:
Исходный массив:
  20   4   5  12  14  10  11  16  18  20
p = 15
Искомый элемент не найден

Используемая формула: I = V • t.

V — пропускная канала (в битах в секунду

или подобных единицах);

t — время передачи.

Найдём время передачи информации по соединению.

Выполним преобразование от Кбайт к бит.

t = I : V = 240 Кбайт : 2048 бит/с =

= (240 • 1024 • 8) : 2048 с =

= (30 • 8 • 210 • 23) : 211 с = 960 с.

Найдём объём файла, который можно передать за это время по другому соединению. Выполним преобразование от бит к Кбайт.

I = V • t = 512 бит/с • 960 с = 491 520 бит =

= 491 520 : 8 : 1024 Кбайт = 60 Кбайт.

ответ;60.