Написати команду, яка встановлює для кнопки ширину 150 пікселів

800*600=480000 байт

паскаль:

uses crt;

var a,b: string; \ а-слово ,b-символ

i: integer; \ переменная для счета

begin

writeln ('слово и символ');

readln (a,b); \\ввод данных

for i: =1to length(a) do if copy (a,i,1)=b then writeln (i); \\копирование по порядку символов слова а   и сравнение каждого с символом b. вывод ответа. или ответов 

readkey; \\если символы в слове повторяются

end.

30 * 70 = 2100 символов на 1 странице

5 * 2100 = 10500 символов на 5 страницах

при кодировке ascii - 1 символ = 1 байт, значит 20500 байт оперативной памяти займет этот текст.

в условии не указано но для кодирования используется фраза "в памяти " при этом для нахождения кода шифрованной буквы нужно к коду исходной буквы прибавить код буквы из предложения к первой букве прибавляем код первой буквы предложения ко второй код второй итд т.

а для расшифровки эти коды нужно вычитать, получаем

в   п   а   м   я

3   17   1 14 33

п   щ     о     я     к

17 27   16   33   17

-

3   17   1     14   33

14 10 15   19     17

м   и   н     с       к

н     щ     ё   п

15   27   7     17

-

3     17   1     14 

12   10   26   3

к     и     е     в