Сформировать одномерный массив. Удалить из него элемент по заданному значению, добавить элемент с заданным значением. (С++)

Створення логотипу є найважливішим елементом іміджу компанії!

Логотип, створення якого є необхідним елементом іміджу компанії, повинен запам'ятовуватися і бути оригінальним! Адже це обличчя компанії. Та й товари без впізнаваного лого не викликають великої довіри.

Товари та послуги без впізнаваного логотипу зливаються із загальною "сірою" масою пропозицій, і складніше стають популярними. Тому розробка логотипу - повинна бути одним з ключових елементів у створенні вашого бренду!

Про роль логотип

Объяснение:

Var
  d1,d2,n:integer;
  k,s:longint;
begin
  Write('Введите натуральное двухзначное число: '); Read(n);
  d1:=n div 10; d2:=n mod 10;
  k:=sqr(n); s:=4*(d1*sqr(d1)+d2*sqr(d2));
  Write(n,': ');
  if k=s then Writeln('Квадрат числа (',k,
      ') равен учетверенной сумме кубов его цифр')
  else Writeln('Квадрат числа (',k,
      ') не равен учетверенной сумме кубов его цифр (',s,')')
end.

Тестовое решение:
Введите натуральное двухзначное число: 48
48: Квадрат числа (2304) равен учетверенной сумме кубов его цифр

Введите натуральное двухзначное число: 47
47: Квадрат числа (2209) не равен учетверенной сумме кубов его цифр (1628)

Замечание: На самом деле лишь одно число 48 среди всех двухзначных чисел удовлетворяет условию равенства, так что достаточно просто сравнивать введенное число с 48, чтобы решить задачу )))