<h3>PascalABC.NET 3.4.2, сборка 1814 от 02.10.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
begin
var s := ReadlnString('Введите строку:');
var c := ReadlnString('Какой символ удвоить?');
s := s.Replace(c, 2 * c);
s.Println
end.
1)?
2)клавиатура (скорей всего)
3)процессор
4)?
5)жёсткий диск или винчестер
6)мышь
7)диск
8)винчестер
9)принтер
Возможно, не уверен, цепь питания
При использовании палитры из 16 млн цветов для хранения цвета одного пикселя требуется log(2)16777216 = 24 бита. Объем изображения = 800*600*24 бит. Время передачи изображения = 800*600*24/14400 = 800 с