Вывести все положительные значения y.если y=cos(x)-sin(x)

Program a;vary:real;i,x,n :integer;beginwriteln ('Введите значение x');readln(x);writeln ('Введите количество повторений подсчета формулы');readln (n);
for x:=1 to n dobeginy := Cos(x) - Sin(x);if (y>0) Then Writeln(y);end;end.

Pascal:
var a,b:real;
begin
  write ('A = ');
  readln (a);
  write ('B = ');
  readln (b);
  writeln ('Summa: ',a+b);
  writeln ('Raznost: ',a-b);
  writeln ('Proizvedenie: ',a*b);
  if b=0 then writeln ('Division by zero!') else writeln ('Chastnoe: ',a/b);
  readln;
end.

C++:
#include <iostream>
using namespace std;

int main()
{
  float a,b;
  cout <<"A = ";
  cin >>a;
  cout <<"B = ";
  cin >>b;
  cout <<"Summa: " <<a+b <<endl
         <<"Raznost: " <<a-b <<endl
         <<"Proizvedenie: " <<a*b <<endl;
  if (b==0)
      cout <<"Division by zero!";
  else cout <<"Chastnoe: " <<a/b <<endl;
}

1) Тот или то, что выполняет алгоритм.
2) Основные свойства алгоритма-Дискретность (последовательность, прерывистость).
Детерменированность (При одинаковом наборе данных неважно где и когда будет выполнен алгоритм).
Результативность (при выполнение действий состовляющих правельный алгоритм будет получен определенный результат).
Массовость (один и тот же алгоритм подходит для решения однотипных задач с разным набором начальных данных).
еще Коректность и конечность.
3)-дворник
-водитель
-бухгалтер
-коммисия
-ученик
-учитель