Информатика, опубликовано 2018-08-22 20:04:58 by Гость
Составьте программу, позволяющую найти количество цифр во введённой строке s
Ответ оставил Гость
//Pascal ABC.Net
Var s:string;k:byte;
Begin
read(s);
for i:=1 to length s do
case s[i] of
1,2,3,4,5,6,7,8,9,0: k+=1;
end;
writeln (k);
End.
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.
Форма вопроса доступна на