Рабочий стол,компьютер,окно
С чем помоч? картинка не грузиться копец(
#include <fstream>
#include <iostream>
using namespace std;
int main()
{
int N;
int array[100];
ifstream file1 ("input.txt");
ofstream file2 ("output.txt");
file1 >> N;
for(int i = 0;i < N;i++) {
file1 >> array[i];
if(i % 2 == 0)
file2 << array[i] << " ";
}
return 0;
}
<em>// PascalABC.NET 3.3, сборка 1583 от 25.11.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var s:=ReadlnString('Введите число:');
Swap(s[1],s[s.Length]); Writeln('Результат: ',s);
end.
<u>Пример</u>
Введите число: 73028
Результат: 83027
(I - информационный объем текста, K - кол-во символов, i - вес одного символа/бит на символ)
Дано:
K = 16 * 30 * 32 шт = 15360 шт
i = 16 бит
I - ?
Решение:
I = K * i = 15360 * 16 бит = 245760.0 бит
245760.0 бит = 30720.0 байт = 30.0 Кбайт