begin var fio:=ReadlnString('Введите Фамилию Имя Отчество->'); var b:=0; for var i:=1 to fio.Length-1 do if (fio[i]='М') or (fio[i]='м') then b+=1; if b<>0 then Println('Буква "М" есть в строке. Она повторяется',b,'раз(а).') else Println('Буквы "М" нету в строке.'); end.
Пример: 1) Введите Фамилию Имя Отчество-> Миг Мария Моисеева Буква "М" есть в строке. Она повторяется 3 раз(а).
2) Введите Фамилию Имя Отчество-> Петренко Петр Петрович Буквы "М" нету в строке.
Alekseevna1811
23.02.2023
# include <iostream>
using namespace std;
int main() { setlocale(LC_ALL, "Russian"); int n, n_copy, min1, min2, temp; min1 = 9; min2 = 9; cout << "Введите число: "; cin >> n; n_copy = n; while (n > 0) { temp = n % 10; if (temp < min1) min1 = temp; n = n / 10; } cout << "Первое минимальное = " << min1 << endl; n = n_copy; int b = 0; while (n) { if (n % 10 != min1) b = b * 10 + n % 10; n /= 10; } while (b) { n = n * 10 + b % 10; b /= 10; } while (n > 0) { temp = n % 10; if (temp < min2) min2 = temp; n = n / 10; } cout << "Второе минимальное = " << min2 << endl; int sum = min1 + min2;
if (sum % 2 == 0) cout << "Сумма двух минимальных цифр " << min1 << "+" << min2 << "=" << sum << " четная." << endl; else cout << "Сумма двух минимальных цифр " << min1 << "+" << min2 << "=" << sum << " не четная." << endl;
system("pause"); return 0; }
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Изображение 20 на 20 точек, использует 10 цветов. Определите количество информации в этом изображении с этим заданием
нужно ли возможность получить от бати 5 минут назад