5
просто название получившихся фигур

копируется, редактируется

1)

s : = 0;

for i : = 1 to k do

begin

  if i mod 2 < > 0 then

      s: = s + i;

end;

2)

for i : = 5 to 55 do

begin

  if i mod 2 < > 0 then

      writeln(i);

end;

3)

s : = 1;

for i : = n to m do

begin

  s: = s * i;

end;

4)

s : = 0;

for i : = 10 to 15 do

begin

        s: = s + i;

end;

обрамления там везде одинаковые

по одному.

обь в канал, мир,енесей,россия проплыли канал. обь выплыла и поплыла себе куда надо.

мир,енесей,россия вернулись обратно перед каналом

в канал заплыл восток.

мир,енесей,россия проплыли канал. восток уплыл

и тд

var a,b,c: real; beginwriteln('введите данные о катетах'); readln(a,b); c: =1/2*a*b; writeln('площадь= ',c: 0: 2); readlnend.

  если паскаль абс, то предпоследнюю строку не обязательно.