С какой строки начинаются все программы для исполнителя "Чертежник" в среде КуМир?

276

353

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

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

DanaФайн

Информатика

4,6(16 оценок)

Program n1; var c: longint; function ch(n: longint ): longint; var i: longint; begin i : = 0; while n > 0 do begin n : = n div 10; i : = i + 1 end; ch: = i end; begin write ('введите число: '); readln (c); if c< 0 then c: =abs(c); writeln ('в этом числе ',ch(c),' разрядов '); end.