var
n,m:integer;
begin
writeln('Задача 1');
readln(n,m);
if n>=m then
writeln('Неправильная')
else writeln('Правильная');
writeln;
writeln('Задача 2');
n:=random(20); m:=random(20);
writeln(n,' ',m);
if n mod m = 0 then
writeln('Делится нацело')
else writeln('Не делится нацело');
writeln;
writeln('Задача 3');
readln(n,m);
if n<=m then
if n=m then writeln('Равные')
else writeln(n)
else writeln(m);
end.
Если моё решение вам, пометьте его лучшим !
Модуляцияланған жоғары жиілікті тербелістен төмен жиілікті тербелісті бөліп алуға арналған құрылғы. Тасымалдаушы жиіліктегі тербелістің модуляциялану (амплитудалық, жиіліктік, фазалық) түріне қарай детекторлар да амплитудалық, жиіліктік және фазалық детекторлар болып бөлінеді.
Қабылданатын сигналдарды белгілеуге арналған сызықты емес схема.
Белгілі бір алгоритммен жұмыс істейтін бөгеуілдер аясынан пайдалы сигналды бөліп алатын құрылғы.[1]