<span>Первая:
</span>
var
x,y,z:real;
begin
readln(x);
y:=x+2.3;
z:=y/1.2;
writeln(x+y+z);
end.
<span>Вторая:
vara,b:real;beginreadln(a);readln(b);writeln('Периметр: ', 2*(a+b));writeln('Площадь: ', a*b);end.
Третья:
varv1,v2,s,t:real;beginreadln(v1);readln(v2);readln(s);readln(t);writeln((v1*t)+(v2*t)+s)end.</span>
Треугольников 40
и 10 квадратов
С точки зрения математики и информатики - любыми. Это вопрос предварительной договоренности в рамках конкретной задачи.
Если ответ не устраивает, то уточните: о множествах и объектах, используемых где именно, Вы спрашиваете.
65 536 можно пронумеровать двумя байтами
1024х768*2=1 572 864 , то есть 1,5Мбит