Помощь - Поиск - Пользователи - Календарь
Полная версия: на тему констант
Форум «Всё о Паскале» > Pascal, Object Pascal > Задачи
kr3v3tkus
задачка - Дана строка. Подсчитать количество цифр, которые в ней содержатся.
я гдето видел, что в константу можно вложить несколько значений, но в учебнике не нашёл.Может ето у меня глюк был и значения влаживаются не в константу??? подскажите куда мне забить 0,1,2,3,4,5,6,7,8,9?
klem4
const digits = ['0'..'9'];
kr3v3tkus
О smile.gif Клем пасиба я то думал как)))

О smile.gif Клем пасиба я то думал как)))

а почему тут несовпадение типа пишет? (
program lol;  
const n=['0'..'9'];
var text:string;
i,k:integer;
begin
writeln('vvest1 text');
readln(text);
k:=0;
for i:=1 to length(text) do
if text[i]=n then inc(k);
writeln('4isla v texte vstre4auts1a ',k,' ra3(a)');
readln;
end.
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.