Есть ответ 👍

Придумать законы и наказания за нарушения законов информационной безопасности​

289
408
Посмотреть ответы 1

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

Stasikone
4,5(95 оценок)

Program z1; var stroka: string; var i: integer; begin writeln('введите строку'); readln(stroka); for i: =1 to length(stroka) do begin if(stroka[i]='1') then stroka[i]: ='0' else if(stroka[i]='0') then stroka[i]: ='1'; end; writeln(stroka); end.

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