Var ch: char;
<span>begin
</span><span> repeat
</span><span> read(ch);
</span><span> if ch in ['0'..'9'] then
</span><span> begin
</span><span> writeln('есть цифра ',ch);
</span><span> exit;
</span><span> end;
</span><span> until ch='.';
</span><span> writeln('нет цифр');
</span><span>end.
</span>
Вычислитель
делопроизводитель
бухгалтер
библиотекарь
модельер
дизайнер
архитектор
мультипликатор
Желтый нарцисс Валя
Красная гвоздика Катя
Желтый тюльпан Маша
Красный тюльпан Саша
колокольчик Даша
Include <iostream>
using namespace
int mail(){
int S, i,n;
cin>>n;
for(i=1,i<=n,i++)
{
S=S+i;
}
cout<<S<<endl;
system(“pause”)
return 0;
<span>}
P.S n это сколько нужно ввести цифр</span>
Этот может ответ 5 но я так думаю