Срочно плиз прога на паскале текст начинается с ненулевой цифры, за которой следуют только буквы. определить, равно ли количество букв в тексте числовому значению первой цифры в тексте.
Срочно плиз прога на паскале текст начинается с ненулевой цифры, за которой следуют только буквы. определить, равно ли количество букв в тексте числовому значению первой цифры в тексте.
Гость
Ответ(ы) на вопрос:
Гостьvar s : string; k,f : longint;
begin
readln(s);
Val(s[1],k,f);
if f<>0 then writeln('Некоректно введена строка')
else if length(s)-1=k then writeln('Равно')
else writeln('Неравно');
end.
Не нашли ответ?
Похожие вопросы