Напишите программу которая выводит первое слово строки.

var s: string;
begin
  write(Введите строку: );
  readln(s);
  s := s + ;
  writeln(copy(s, 1, pos( , s) - 1));
end.

Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!

Загрузить картинку
×