Program calculator;
var a, b, c: integer;
begin
writeln('Введи 2 числа: ');
readln(a,b);
c:=a+b;
writeln(c);
end.
Var a:integer;
begin
readln(a);
if a = 1
then write('I');
if a = 2
then write('II');
if a = 3
then write('III');
if a = 4
then write('IV');
if a = 5
then write('V');
if a = 6
then write('VI');
if a = 7
then write('VII');
if a = 8
then write('VIII');
if a = 9
then write('IX');
if a = 10
then write('X');
if a = 11
then write('XI');
if a = 12
then write('XII');
if a = 13
then write('XIII');
if a = 14
then write('XIV');
if a = 15
then write('XV');
end.
32F + 12°...
я думаю как-то так!!!!!
Pascal abc.
Проверка
введите кол-во элементов массива
10
12 13 27 29 19 18 11 20 22 16
<span>сумма=187</span>
Для алфавита из 256 символов на один символ нужно 8 бит. Это 1 байт. Значит на строку 64 байта. Количество байт на странице 32*64=2048. Разделим на 1024 и получим объем одной страницы в килобайтах - 2 кб. А у нас 20 кб, значит страниц 10.
Ответ: 10 страниц.