Написать программу: 1. Ввод с клавиатуры строки данных; 2. Подсчитать длину строки и вывести на экран.
Написать программу: 1. Ввод с клавиатуры строки данных; 2. Подсчитать длину строки и вывести на экран.
Гость
Ответ(ы) на вопрос:
Гостьprogram art;
var s: string;
k: integer;
begin
writeln('Введите строку');
readln(s);
k:=length(s);
writeln('Длина строки: ',k);
end.
Гость1.
var
a: string;
begin
readln(a);
writeln(a);
end;
2.
var
b: integer;
begin
readln(b);
writeln(length(b));
end.
Не нашли ответ?
Похожие вопросы