Придумать и оформить на листе бумаги числовой кроссворд, где в качестве слов используются цифры, а в качестве вопросов – примеры

Просто загуглите в интернете в поиске картинки

program raf105;

var

 s,s1,s2: string;

 slov,numb,i,j,l: integer;

begin

writeln('Введите строку:');

readln(s);

s:= lowercase(s);

s1:= '';

s2:= '1234567890';

while j<>-1 do

begin

 j+= 1;

 l+= 1;

 for i:=1 to length(s1) do

   if (s[j] = s1[i]) and (slov = 0)

     then slov+= 1

     else if (i<=length(s2)) and (s[j] = s2[i])

     then numb+=1;

 if s[j+1] = ' '

   then j:= -1;

end;

for i:=l+1 to length(s) do

begin

 if s[i] = ' '

   then

   begin

     for j:=1 to length(s1) do

       if s[i+1] = s1[j]

         then slov+= 1;

   end

   else

   begin

     for j:=1 to length(s2) do

       if s[i] = s2[j]

         then numb+=1;

   end;;

end;

writeln;

writeln('В строке:');

writeln(slov,' сл.');

writeln(numb,' циф.');

end.

Язык PascalABC

1) С моделью: управлять через пульт управления. С оригиналом: управлять, сидя в кабине пилота. С обоими: управлять полётом.
2) С моделью: обсуждать. С оригиналом: одеть. С обоими: узнать цвет куртки.
3) С моделью: изменять что-то в плане, чертить. С оригиналом: жить в квартире. С обоими: вычислить общую площадь квартиры.
4) С моделью: любоваться им, изменить форму. С оригиналом: кипятить в нём воду. С обоими: узнать объем вмещаемой жидкости.
5) С моделью: думать о ней, изменить представление. С оригиналом: быть уже в пути и ждать её завершения. С обоими: получать удовольствие.
Ощутить размер оригинала, потрогать, воспринять как что-то настоящее.