Дан символьный файл f. Записать в файле g…

Question

Дан символьный файл f. Записать в файле g, с сохранением порядка их следования, те символьные данные: a) которым в файле f предшествует буква а б) вслед за которыми в файле f идет буква а

Answer 1

35

greenof

10 марта 2023

var f,g: string; i: integer; beginreadln (f); for i: =1 to length (f) -1 do if (f[i+1]='а') then g: =g+f[i]; writeln (g); g: ='; for i: =2 to length (f) do if (f[i-1]='а') then g: =g+f[i]; writeln (g); end.

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: