Такая информация скорее всего называется устаревшей
1. Var s,i:integer;
Begin
S:=0;
For i:=1 to 1000 do
If (i mod 5<>0)and (i mod 7 <>0) Then s:=s+1;
Writeln(s);
Readln;
end.
#include<iostream>
#include<conio.h>
int N;
int main()
<span>{
</span><span> std::cin >> N;</span><span>
if (N % 2 == 0 && N > 0)</span><span>
std::cout << "number is even and greater than 0" << std::endl;
</span><span> else if (N % 2 == 1 && N > 0)</span><span>
std::cout << "number is odd and greater than 0" << std::endl;</span><span>
else if (N < 0)</span><span>
std::cout << "number is negative" << std::endl;</span><span>
getch();</span><span>
return 0;
</span><span>}</span>
Что такое дискретизация? Это нежелательный эффект, который приводит к тому, что качество фотографии заметно ухудшается. Данное явление может быть ассоциировано с любым устройством или же процессом, в котором информация подразделяется на несколько отдельных отсчетов. В данном случае дискретизация может рассматриваться в качестве типа интерференционной картины, если есть определенное соотношение между частотой данного явления и определенной периодической структур - Читайте подробнее на FB.ru: <span>http://fb.ru/article/198004/chto-takoe-diskretizatsiya-chastota-diskretizatsii</span>
var
x, y: real;
begin
write ('x='); readln(x);
write ('y='); readln(y);
if (sqr(x)+sqr(y)<=1) and (x*y<=0) then
writeln ('точка принадлежит данной области')
else
writeln ('точка не принадлежит данной области');
end.