Составить из символов слово

@artem08011997 · Регистрация: 02.10.2013

Студворк — интернет-сервис помощи студентам

Запрашивая у пользователя произвольные символы,пока не будет введен пробел,составить из них слово и подсчитать количество символов в слове.

Kodzaev · 18.10.2013, 17:45

Pascal

var
  c: char;
  s: string;
 
begin
  Writeln('Введите символы. Конец ввода - "пробел"');
  repeat
    Readln(c);
    s := s + c;
  until c = #32;
  Writeln('Полученное слово: ', s);
  Writeln('Его длина = ', Length(s) - 1);
  Readln
end.

@artem08011997 0 / 0 / 0 Регистрация: 02.10.2013 Сообщений: 16
		1
	Составить из символов слово 18.10.2013, 16:53. Показов 1747. Ответов 1 Метки нет (Все метки) Запрашивая у пользователя произвольные символы,пока не будет введен пробел,составить из них слово и подсчитать количество символов в слове. 0

Опции темы

Составить из символов слово

Решение