Меню сайта

Задача №21

Вычислитьсколько цифр в числе.

uses crt-

var number:string-

begin-

clrscr-

writeln(‘Введите натуральное число N’)-

readln(number)-

writeln(‘В числе ‘, number, ‘ цифр ‘, length(number))-

end.

Категория: Строки | Дата: 15.01.13

Меню раздела
Блок