Как-то так
const x0=0; x1=180; dx=1;
var x:real;
begin
x:=x0;
while x<=x1 do
begin
writeln(x,' ',x/180*pi);
x:=x+dx;
end;
<span>end.</span>
Дискретный сигнал - информационный сигнал. Сигнал называется дискретным, если он может принимать лишь конечное число значений.
#include <iostream>
using namespace std;
int main() {
int n, s = 0;
cin >> n;
int a[n];
for(int i = 0; i < n; i++) cin >> a[i];
for(int i = 0; i < n; s+=(a[i]*a[i]), i++);
cout << s << endl;
}
var
x, y, s: integer;
begin
readln(x, y);
s := (2*x + y) * (x-y);
writeln(s);
end.