// PascalABC.Net 3.0, сборка 1066 var s,s1:string; i:integer; a:char; begin Write('Введите натуральное число любой длины :'); Readln(s); Write('Введите цифру, которую надо удалить: '); Readln(a); s1:=''; for i:=1 to Length(s) do if s[i]<>a then s1:=s1+s[i]; Writeln('Результат: ',s1) end.
Тестовый прогон: Введите натуральное число любой длины :3141592653589793 Введите цифру, которую надо удалить: 5 Результат: 3141926389793
2. Современное решение (так в школе почему-то не учат)
// PascalABC.Net 3.0, сборка 1066 begin var s:=ReadString('Введите натуральное число любой длины :'); var a:=ReadChar('Введите цифру, которую надо удалить: '); Write('Результат: ',s.Replace(a,'')); end.
Проще всего складывать в столбик как обычные десятичные числа, но если в сумме число получится больше 8 (система восмиричная), то мы отнимаем 8, смотрим: меньше ли получившийся остаток 8, если нет, то снова отнимаем восемь и тогда записываем остаток, а в "ум" запишем число отнятых восьмерок
574+467=1263 (все числа в восьмиричной системе счисления)
так, складывая 4 и 7, получаем 11, что больше 8, поэтому отняв 8, получим цифру 3, которую и записываем как последнюю цифру числа (3 пишем, 1 в уме), далее складываем 6 и 7 и не забываем про 1, потому что в раз мы отняли всего одну восьмерку, получаем 14, но записываем только 6, а 1 в уме, затем 5, 4 и 1 - 2 пишем, 1 в уме, далее просто приписываем единицу, получаем 1263
P.S. несмотря на то, что кажется сложно, это немногим отличается от десятичной системы сложения в столбик
#include <iostream>
using namespace std;
int** CreateArr(int rows, int cols)
{
int** arr = new int* [rows];
for (int i = 0; i < rows; i++) arr[i] = new int[cols];
return arr;
}
void FillArr(int** arr, int rows, int cols)
{
for (int i = 0; i < rows; i++) for (int j = 0; j < cols; j++) arr[i][j] = -10 + rand() % 20;
}
void PrintArr(int** arr, int rows, int cols)
{
cout << endl << endl;
for (int i = 0; i < rows; i++)
{
int min{ -1 };
cout << "Строка #" << i << ": ";
for (int j = 0; j < cols; j++)
{
cout << '\t' << arr[i][j];
if (arr[i][j] >= 0 && (arr[i][j] < arr[min / 10][min % 10] || min == -1)) min = (i * 10) + j;
}
cout << '\t';
if (min != -1) cout << "Минимальный положительный элемент в этой строке: " << arr[min / 10][min % 10] << " под индексом [" << min % 10 << ']' << endl;
else cout << "Положительных элементов нет" << endl;
}
cout << endl << endl;
}
void DeleteArr(int** arr, int rows)
{
for (int i = 0; i < rows; i++) delete arr[i];
delete[] arr;
}
int main()
{
srand(time(NULL));
setlocale(0, "");
int n{}, m{};
cin >> n >> m;
int** a = CreateArr(n, m);
FillArr(a, n, m);
PrintArr(a, n, m);
DeleteArr(a, n);
return 0;
}