Скачиваний:
22
Добавлен:
06.02.2016
Размер:
188 б
Скачать
program prog04;
uses crt;
var name: string[25];
begin
clrscr;
write('Введите имя : ');
readln(name);
write('Имя ', name, ' содержит ', length(name), 'символ. ');
readln;
end.
Соседние файлы в папке 1 лаб. Арифметические операции