<h3>PascalABC.NET 3.4.2, сборка 1814 от 02.10.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
begin
var s := ReadlnString('Введите строку:');
var c := ReadlnString('Какой символ удвоить?');
s := s.Replace(c, 2 * c);
s.Println
end.
var a,b : real;
begin
read(a,b);
if (a<0) and (b<0) then Writeln(sqrt(a/b)) else
Writeln(a*3,' ',b+7);
end.
Система, в которой выходной сигнал не подаётся на управляющее устройство, называется разомкнутой.
Система, в которой происходит измерение выходной переменной и сравнение её с заданным значением, называется замкнутой.
1054=10000011110
798=1100011110
954=1110111010
1257=10011101001
365=101101101