Внести изменения в реализацию класса А , чтобы в классе В были возможны указанные действия: (проект протестировать) class A
{int a,b,c;
public:
A();
A(int,int,int);
};
class B: public A
{int d;
public:
int Sum ( )
{int result=a+b+c+d;
return result;}
};

291

488

Посмотреть ответы 1

Ответы на вопрос:

NikitaZlatoystov

Информатика

4,8(64 оценок)

Вот так пойдет? дан массив. заменить элементы с нечетными номерами на квадраты их номеров. program tt; uses wincrt; type tmas=array[1..100] of real; var d,a: tmas; i,j,n: byte; procedure enter_d(n: byte; var d: tmas); begin randomize; for i: =1 to n do begin d[i]: =random(40); write(d[i]: 0: 0,' '); end; writeln; end; procedure form_a(n: byte; d: tmas; var a: tmas); begin for i: =1 to n do begin if odd(i)=true then a[i]: =d[i]/i else a[i]: =sqr(d[i]); end; end; procedure show_a(a: tmas); begin for i: =1 to n do write(a[i]: 0: 2,' '); end; end; begin clrscr; writeln('введите размер массива: '); readln(n); enter_d(n,d); form_a(n,d,a); show_a(a); end.