Задачка в Turbo Pascal, тип string. Дана строка, состоящая из букв
Задачка в Turbo Pascal, тип string. Дана строчка, состоящая из букв и цифр. Вывести на экран количество чисел. К примеру: moloko67papa3gol289on56da, здесь числа 67,3,289,56; обязано вывести количество - 4. Я понимаю, что сделать, но не знаю, как записать. Заблаговременно спасибо тем, кто поможет!
Задать свой вопрос1 ответ
Федотенков
Александр
Как досадно бы это не звучало, но только на c++
include lt;iostreamgt;
include lt;conio.hgt;
using namespace std;
int main()
string str;
getline(cin,str);
int i=0, k=0;
bool t=false;
while(ilt;str.length())
while(str[i]gt;='0' amp;amp; str[i]lt;='9')
t=true;
i++;
if(t==true)
k++;
t=false;
i++;
coutlt;lt;klt;lt;endl;
_getch();
return 0;
include lt;iostreamgt;
include lt;conio.hgt;
using namespace std;
int main()
string str;
getline(cin,str);
int i=0, k=0;
bool t=false;
while(ilt;str.length())
while(str[i]gt;='0' amp;amp; str[i]lt;='9')
t=true;
i++;
if(t==true)
k++;
t=false;
i++;
coutlt;lt;klt;lt;endl;
_getch();
return 0;
Vitalij Fedinov
Спасибо, окончательно, но мы С++, еще даже не изучали! Что я вообщем могу здесь понять!
Виталя Никовский
Алгоритм такой: мы вводим строку с клавиатуры, присваиваем i и k значение 0, а t значение false, позже создаем цикл пока i меньше длины строчки, позже если нам встречается знак цифры, мы t присваиваем значение true, а i увеличиваем на 1, дальше мы спрашиваем если значение t true, то k увеличиваем на 1, после, t присваиваем false и i увеличиваем на 1 пока основной цикл работает, в итоге выводим k, что и является количеством чисел в строке
Semjon Dikenshtejn
Integer main()begin string str;Integer i := 0, k := 0;Boolean t := false;while (i := '0' and str[i]< := '9') dobegin t := true;i++;end; if (t=true) then begin k++;end;t := false;i++;end; Result := 0;end;
Кирилл Гольдшмид
ввод и вывод сделай сама
Алексей Кренгель
ибо в турбо паскале не шарю
, оставишь ответ?
Похожие вопросы
-
Вопросы ответы
Новое
NEW
Статьи
Информатика
Статьи
Последние вопросы
найти порядковый номер 41Э если в ядре 20 нейтронов
Разные вопросы.
в ряду натуральных чисел 3, 8, 10, 24, … 18 одно
Математика.
Предприятие по производству с/хоз продукции на производство затратило 3527000 руб Валовый
Разные вопросы.
Математика, задано на каникулы. ВАРИАНТ 1004
НОМЕР 1,2,3,4,5,6,7,8.
Математика.
Имеются три конденсатора емкостью С1=1мкФ, С2=2мкФ и С3=3мкФ. Какую наименьшую емкость
Физика.
Из точки м выходят 3 луча MP MN и MK причём
Геометрия.
выпиши в свою тетрадь те правила этикета которые тебе не были
Разные вопросы.
Анна хорошо учится у неё много подруг свободное от учёбы время
Обществознание.
10) Килограмм конфет дороже килограмма печенья на 52 р. За 8
Математика.
Во сколько раз число атомов кислорода в земной коре больше числа
Химия.
Облако тегов