5)
program ex1;var x, y, z : integer;begin x:= 17; y:= -9; if x < y then z:= x * y else z:= y + x; writeln(z);end.
6)
program ex1;var x, tmp : real;begin readln(x); if x<=0 then tmp:=(sin(sqr(x)) - sqrt(power(x,3)+1))/(5*power(x,4)+ 3.5*x); if (x>0) and (x<=4) then tmp:=sqrt(x+sqrt(x+1))+4*x; if x>4 then tmp:= (1.44*abs(power(x,3)-1)-2.5*x)/(x+1);write(tmp);end.
7)
program ex1;var a,b,c:integer;begin readln(a,b,c); if (a>= -3) and (a<2) then write (' a '); if (b>= -3) and (b<2) then write (' b '); if (c>= -3) and (c<2) then write (' c ');end.
Pascal
var
s : string;
T : text;
i : integer;
begin
assign (T,'File.txt'); //Ассоциация переменной T с файлом File.txt
rewrite (T); //Перезапись файла T и открытие его для записи
for i := 1 to 6 do
begin
readln (s);
writeln (T,s);
end;
close(T); //Закрытие файла T
end.
8064 Кбайт
........................
Дискретные сигналы (они же цифровые) - принимают конечное число значений функции:
примеры дискр:
- энергетические уровни атома,
- сигналы светофора
- символы, слова... и т. д. и т. п.
непрерывный (он же аналоговый) - принимает бесконечное количество значений функции, амлитуда и время которого меняются непрерывно.
примеры непрерывных:
- звуковая волна,
- диаграмма изменения влажности, напряжения, и других некоторых физических величин
для преобразования непрерывного сигнала в дискретные производят дискретизацию. Процесс дискретизации сопровождается потерей информации если частота дискретизации в 2 раза меньше максимальной частоты непрерывного сигнала по теореме Найквиста... В России эту теорему называют Котельникова.