Придумайте и изобразите в виде графа структуру сайта "моя семья"

varn: integer; beginreadln(n); n: = n div 10; n: =(n div 100)*10 +n mod 10; writeln(n); n: = (n mod 10)*100+ ((n mod 100) div 10)*10+ n div 100; writeln(n); end.

var sum,n,i: integer;

begin

readln(n);

sum: =0;

for i: =1 to n do

    sum: =sum+i;

writeln(sum);

readln;

end.

1) присвоения : =2)343,5  3) 1a=2 b=5var a,x,x1,x2,x3: integer; begin      read(a);       writeln('4. s=',4*a);             read(x);       x3: =x mod 10;       x1: =x div 10;       writeln('5. x=',x3*100+x1); end.

если хотим получить универсальное решение

1 сначала составляем таблицу или запись или как угодно назовите - набор связаных между собой данных определенных типов (зависит от языка программирования)

одна запись таблицы имеет

  first_row

  last_row

  ticket_cost

  sits_in_row

2 заполняем таблицу любым удобным нам способом

3 делаем нужные нам рассчеты

для каждой записи таблицы

  s: =s + (last_row - first_row + 1) * sits_in_row * ticket_cost

4 делаем вывод результата любым удобным нам способом