Как называется произвольное количество следующих один за другим символов текста

var i: integer;

begin

for i: =1 to 1000 do

if (i mod 3=0) or (i mod 7=0) then write(i);

end.

теперь не плагиат

program pr; var c: integer; beginwriteln('введите число с'); readln(c); writeln('остаток от целочисленного деления числа ',c,' на 10 в квадрате равен ',sqr(c mod 10)); end.

(12-3): (4+5)=1

1х2х3-4+5-6=1

(12: 3+4+5): (6+7)=1

(1+2-3+4+5+6-7): 8=1

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