Есть ответ 👍

Дано число 1,7684e-16 .дано число 1,7684e-16 .

254
275
Посмотреть ответы 1

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


Var t: string; k: integer; s,c: char; begin writeln('введите строку'); readln(t); writeln('введите буквы s и c'); readln(c); while not(pos(s,t)=0) do begin k: =pos(s,t); t[k]: =c; end; writeln('изменённая строка -  ',t); end.

Популярно: Информатика