Ребята, помогите пожалуйста найти ошибку в паскале, работа над символьными данными, мне...

0 голосов
47 просмотров

Ребята, помогите пожалуйста найти ошибку в паскале, работа над символьными данными, мне нужно поставить пробелы между словами, а они у меня слитно выходят
Var A, F, E, r, l, w, Q, s1, s2, s3, s4, g, h, d: string;
Begin
s1:= 'КУ';
s2:= 'ПИЛА';
s3:= 'ШОН';
s4:= 'Ю';
g:= copy (s3, 1, 1);
d:= copy (s1, 1, 1);
h:= copy (s2, 4, 1);
A:= concat (s1, s1, g, d, h);
E:= concat (s1, s1, s3, s1);
F:= concat (s1, s2);
r:= copy (s1, 1, 1);
l:= copy (s2, 4, 1);
w:= copy (s2, 1, 1);
Q:= concat (r, l, w, s4, s3);
writeln (A, E, F, Q);
end.


Информатика (233 баллов) | 47 просмотров
Дан 1 ответ
0 голосов
Правильный ответ

A:= concat (s1, s1, g, d, h, ' ');
E:= concat (s1, s1, s3, s1, ' ');
F:= concat (s1, s2, ' ');

(15.5k баллов)
0

Все так же, слитно

0

Между одинарными кавычками пробел есть?

0

Не было, теперь получилось, спасибо)