Надо составить программу, которая для любого натурального числа печатает количество цифр в записи этого числа. расписать все четко

221

474

Посмотреть ответы 2

Ответы на вопрос:

pavy1980

Информатика

4,7(72 оценок)

Строками: var s: string; begin writeln('vvedi chislo: '); readln(s); writeln('chislo cifr=',length(s)); readln; end; не строками: var n,k: longint; begin write('n='); readln(n); k: =0; while n> 0 do begin n: =n div 10; k: =k+1; end; write('k=',k); readln end.