Ввести строку из текстового файла. продублировать в ней все цифры. остальные символы оставить без изменения. pascalabc.net (продублировать это значит приписать к каждой цифре справа такую же)

251

288

Посмотреть ответы 2

Ответы на вопрос:

muzaka

Информатика

4,5(35 оценок)

Var f: text; i,n: integer; s,s1: string; begin; assign(f,'text.txt'); reset(f); while not(eof(f)) do read(f,s); close(f); n: =0; while n< > length(s) do begin; inc(n); for i: =0 to 9 do begin; str(i,s1); if s[n]=s1 then begin; delete(s,n,1); s1: =s1+s1; insert(s1,s,n); inc(n); end; end; end; writeln(s); end.

ирина1834

Информатика

4,4(9 оценок)

Информатика- это наука изучающая процессы сбора, методы, хранения, обработки, передачи информации с компьютерных технологий компьютерная технология- это тоже самое, обобщенное название сбора, методов, воспроизведения, защиты, передачу, обработку информации с компьютера (. то есть тоже самое)