V. Программа: var st: string; n: integer; begin writeln('Введите строку'); readln(st); n := length(st); for var i := 1 to n do if (st[i] = ',') then st[i] := '.'; writeln('Преобразованная строка: '); writeln(st); end.
Пояснить каждую строку, ну... что значит, обозначает, что делаем.
Хэлп.
Информатика 8 класс Программирование на Pascal информатика 8 класс программа на Паскале работа со строками преобразование символов цикл for в паскале длина строки в паскале ввод и вывод в паскале замена символов в строке Новый
Давайте разберем программу построчно, чтобы понять, что происходит в каждой строке.
1. var st: string; n: integer;
2. begin
3. writeln('Введите строку');
4. readln(st);
5. n := length(st);
6. for var i := 1 to n do
7. if (st[i] = ',') then st[i] := '.';
8. writeln('Преобразованная строка: ');
9. writeln(st);
10. end;
Таким образом, программа принимает строку от пользователя, заменяет все запятые в ней на точки и выводит результат на экран.