Uses crt;
var a, b, S, P:integer;
begin
write('a='); readln(a);
write('b='); readln(b);
S:=a*b; P:=2*(a+b);
write('S=',S,' ','P=',P);
end.
p.s.Где мы выводим на экран значения площади,там после второй S запятая,затем два апострофа через пробел(для пробела в итоге),затем запятая,потом вывод периметра идет аналогичным образом,вот! Спрашивайте,если что не понятно!
Graph-Примитивы, перья и кисти, шрифты, графич.окно, события мыши и клаиатуры
objects-создание объектов, управление свойствами объектов
Почти все задачи 7 класса решаются по формуле количество цветов N равно 2 в степени i, где i - глубина цвета точки
N=2^i
Вот тебе решение в документе. Должно быть всё норм работать.