Может, второе вот так?
А в решении Аштона лучше так напиши
readln(a, b);
writeln('P = ', 2 * (a + b));
writeln('S = ', a * b);
а то будут дополнительные вопросы к тебе у препода.
1) б)монитор
2) 10бит, 2байта, 20 байтов, 1010байтов, 1 Кбайт
3) 1,5*1024*1024*8=12582912/128000=98,4 сек
Прошу прощения, но где рисунки и фигуры?