Установите соответствие между этапом решения задачи в интегрированной среде разработки и его назначением
217
449
Ответы на вопрос:
Var a,b: string; i: integer; begin write('a: '); readln(a); write('b: '); readln(b); for i: =length(a) downto 1 do if pos(a[i],b)=0 then delete(a,i,1); writeln(a); end. пример: a: primerb: writerier
Популярно: Информатика
-
Alisa666666666666618.03.2021 12:20
-
Сникерс1124.07.2020 03:10
-
ark2006panozs0he31.08.2022 11:21
-
andrey23113210.11.2020 15:04
-
butterflygirl112.06.2021 01:44
-
KhanKotyan16.12.2022 20:13
-
milena22605.10.2021 11:18
-
УмныйЛёд14.01.2021 04:35
-
Арти200416.03.2021 14:10
-
AnastasiaP65419.09.2022 20:33