Прога на паскале текст начинается с ненулевой цифры, за которой следуют только буквы. определить, равно ли количество букв в тексте числовому значению первой цифры в тексте.
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.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
