Question

Решите задание 7 (а) пожалуйста, времени очень мало(

Программа PascalABC

9 класс

Answer 1

Ответ:

program ex;

var a:string; b:integer;

begin

readln(a);

b:=pos(' ',a);

delete(a,b+2,length(a)-b);

writeln(a,'.')

end.