Вывести на экран переменную а целого типа, которая будет занимать на 7 позиций​

2 var  3 s: string;   4 begin  5  readln(s); 6  while  pos('с',s)> 0  do  delete(s,pos('с',s),1); 7writeln(s);   8 end.это точно

#include < stdio.h>

#include < conio.h>

int main( void )

{

  int c, i;

  printf("input number: ");

  scanf(& c);   //амперсант c в скобках

  i = (int)(c%10);

  c = i*i;

  printf("answer: %i", c);

  getch();

  return 1;

}

var ch,n,i: longint;

ch1,s: string;

begin

  read(s,ch);

  n: =length(s);

  writeln(n,' ',ch);

  str(ch,ch1);

  for i: =1 to n do if s[i]=ch1 then write(i,' ');

end.

пусть х лет мальчику, тогда

(х+2)/(х-2)=2

х+2=2(х-2)

х+2=2х-4

х=6лет мальчику

пусть у лет девочке, тогда

(у+3)/(у-3)=3

у+3=3(у-3)

у+3=3у-9

2у=12

у=6 лет девочке

ответ : мальчик и девочка одного возраста