Задача на паскаль Напишите программу на паскале, которая вводит строку, состоящую только из точек и букв Х, и заменяет в ней все точки на нули и все буквы X на единицы. Пример: Введите строку: ..X.XX. Двоичный код: 0010110
Задача на паскаль Напишите программу на паскале, которая вводит строку, состоящую только из точек и букв Х, и заменяет в ней все точки на нули и все буквы X на единицы. Пример: Введите строку: ..X.XX. Двоичный код: 0010110
Не можешь разобраться в этой теме?
Обратись за помощью к экспертам
Гарантированные бесплатные доработки в течение 1 года
Быстрое выполнение от 2 часов
Проверка работы на плагиат
Поможем написать учебную работу
program ReplaceChars;
var
str: string;
i: integer;
begin
writeln('Введите строку: ');
readln(str);
writeln('Двоичный код:');
for i := 1 to length(str) do
begin
if str[i] = 'X' then
write('1')
else if str[i] = '.' then
write('0');
end;
end.