1)16.08899817075
нужно кбайти перевести в биты ы поделить на 128000
2) 608 Кбайт
Нужно 256000*19перевести в кбайты
Тип .....................................
Это легко смотри ты должна сделать точно такой же в тетрадь и формулу S=a*v
Var
i: integer;
ar: array[1..3]of integer;
procedure PS(a: integer);
var
P: Integer;
S: Real;
begin
P := 3 * a;
S := sqrt(3) / 4 * sqr(a);
writeln(P, ' ', S:0:6);
end;
begin
readln(ar[1], ar[2], ar[3]);
for i := 1 to 3 do PS(ar[i]);
end.
1) <span>Люди используют компьютер, чтобы хранить данные
2) </span>Люди используют телефон, чтобы <span>передавать информацию
3) </span><span>Когда мы укололись о шипы кактуса ,то получили тактильную информацию (потому что тактильная информация — это ощущения).</span>