Школьные Знания.com
Какой у тебя вопрос?
10 - 11 классыИнформатика 8+4 б
Дан массив вещественных чисел:
Все элементы с нечетными номерами заменить на их квадратный корень
Отметить нарушение РРПП 01.04.2013
ответы и объяснения
Проверенный ответ
Tlalok
Tlalok Почетный грамотей
var
a:array[1..100] of real;
i, n:integer;
begin
write('Введите количество элементов '); readln(n);
for i := 1 to n do
begin
write('a[', i ,'] = ');
readln(a[i]);
end;
writeln;
writeln('Исходный массив:');
for i := 1 to n do
begin
write(a[i], ' ');
if i mod 2 = 1 then
a[i] := sqrt(a[i]);
end;
writeln;
writeln;
writeln('Преобразованный массив:');
for i := 1 to n do
write(a[i]:0:2, ' ');
writeln;
end.
Поделитесь своими знаниями, ответьте на вопрос:
Проанализируйте информацию , поставив вместо вопросительных знаков числа. а) 1 байт = ? бит = 2 в 3 степени б) 213 бит = ? кбайт в) 1 мбайт = ? кбайт = ? байт = ? бит г) ? кбайт = ? байт = 12288 бит
213 бит = 0.026 кбайт
1 мбайт=1024 кбайт=1048576 байт= 8388608 бит
1,5 кбайт=1536 байт = 12288 бит