В строковом массиве из 9 слов заменить слова из 3 букв на пробел
Program pr1;
var a: array[1..9] of string; i: integer;
begin
writeLn(заполните массив слов);
for i := 1 to 9 do
readLn(a[i]);
for i := 1 to 9 do
if length(a[i]) = 3 then
a[i] := ;
writeLn(обработанный массив);
for i := 1 to 9 do
writeLn(a[i]);
end.
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
