Якого типу даних має бути змінна, яка позначає параметр у циклі з лічильником?

смотри описание блок схемы на картинке

2)

var a,b,c: integer;

begin

  read(a,b,c);

  writeln('3 - ',100-a-b-c);

end.

3) много писанины. вообщем длина стороны считается d: =sqrt((x2-x1)*(x2-x1)+(y2-y1)*(y2-y1))

площадь находится по формуле герона

4)var a: integer;

begin

  read(a);

  writeln('plowad grani = ',a*a);

  writeln('plowad polnoj pov= ',a*a*6);

  writeln('objem= ',a*a*a);

end.

var a,a12,a1,a2,a3,s: integer; begin readln(a); a1: =a div 100; a12: =a mod 100; a2: =a12 div 10; a3: =a12 mod 10; s: =a1+a2+a3; writeln(s); end.

a1-первое число трехзначного числа, a2-второе,a3-третье, a12-вторые два числа

1) количество точек -100 

2) так как всего 2 цвета черный и белый. то глубина цвета равна 1 ( 21   =2) 

3) объем видеопамяти равен 100*1=100бит 

во втором действии 2 в степени 1, а не 21.