Получите из слова тестирование слово тостер.
pascal abc​

ответ:

код к : «из слова тестирование сделать слово товар»

1.var s: string;

2.begin

3.s: ='тестирование';

4.delete(s,1,2);

5.delete(s,5,2);

6.writeln(s);

7.readln

8.end.

объяснение:

периметр треугольника равняется сумме длин всех трех его сторон. он вычисляется по формуле p=a+b+c, в которой a, b и c – это стороны фигуры.

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.