Составьте программу, которая позволяет вывести на экран первое слово строки s . строка s , состоящая из двух слов, разделённых пробелом, вводится с клавиатуры.

dzikita2 dzikita2    3   17.03.2019 14:40    2

Ответы
temaghj2 temaghj2  25.05.2020 20:08

Program Pr1;
uses crt;
var stroka,tmp:string;
i:integer;
Begin
clrscr;
readln(stroka);
for i:=1 to length(stroka) do if stroka[i]=' ' then tmp:=copy(stroka,1,i-1);
writeln(tmp);
end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика