Input a
f$=str$(a)
n1=val(mid$(f$,2,1))
n2=val(mid$(f$,3,1))
s=n1+n2
print s
Var
k:integer;
Begin
Write('k = ');ReadLn(k);
For k:= 1 to k do
Write(k*2-1,' ')
End.
Ну по моему эта буква а! это буква А-вставка текста в изображений
8 Кбайт = 8*1024 байт = 8192 байт или символов печатного текста
8192/(32*40*2) = 3.2 или 4 листа
Ответ 4 листа. 4-й лист будет заполнен не до конца