pascal abc. Составьте программу, которая позволяет вывести на экран первое слово
строки, состоящей из двух слов, разделенных пробелом. Строка вводится
с клавиатуры.
Аноним:
ну вообще есть и норм компы, но Паскаль в программе обучения идёт
Ну так уже 12 лет PascalABC.NET
Современный мощный язык, заточенный на обучение
Скорее, это информатик ваш остался мозгами в 1983 году, когда вышел ТурбоПаскаль, эмулятором которого является Pascal ABC.
возможно
а сможешь сделать в pascal abc.net а я уже попробую ему донести что хер знает как работать в старье этом
Задача твоя проста. Найди при помощи Pos позицию k - место пробела в строке, а потом вырежи по Copy первый k - 1 символ
ага, понял
спасибо, за то что пояснил
Ну, в PascalABC.NET можно писать и как на ТурбоПаскале, конечно...
Ответы
Ответ дал:
2
var
k: integer;
s: string[50];
begin
Readln(s);
k := Pos(' ', s);
Writeln(Copy(s, 1, k - 1))
end.
begin
ReadlnString.ToWords.First.Print // На PascalABC.NET
end.
ReadlnString.ToWords.First.Print // На PascalABC.NET
end.
Прочитать строку.Разбить на слова по пробелам.Взять первое.Вывести"
Вас заинтересует
1 год назад
1 год назад
1 год назад
3 года назад
3 года назад