Каким должно быть значение переменной d, чтобы значение s в результате работы программы стало равным 181? s:= 1;
d:= 5;
for k:= 1 to 10 do
s:=s+d;
(в поле ответа введите только численное значение)

program summa;

var s, a, b, c : word;

begin

            write('введите a - > '); readln(a);

            write('введите b - > '); readln(b);

            write('введите с - > '); readln(c);

            s: =a+b+c;

            write(' сумма равна ',s);

            readln

end.

* 60 / 16 =

поскольку http: \\ftp. не бывает, то ftp: \\schools.ru\program.exe

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.