<em>// PascalABC.NET 3.2, сборка 1338 от 16.11.2016</em>
begin
var x:=-3.14;
while x<=3.14 do begin
Writeln(x:5:2,' ',sqr(sin(x))+sqr(cos(x)));
x:=x+0.2
end
end.
Результат
-3.14 1
-2.94 1
-2.74 1
-2.54 1
-2.34 1
-2.14 1
-1.94 1
-1.74 1
-1.54 1
-1.34 1
-1.14 1
-0.94 1
-0.74 1
-0.54 1
-0.34 1
-0.14 1
0.06 1
0.26 1
0.46 1
0.66 1
0.86 1
1.06 1
1.26 1
1.46 1
1.66 1
1.86 1
2.06 1
2.26 1
2.46 1
2.66 1
2.86 1
3.06 1
Первое закреплённое изображение было сделано в 1822 году
французом Жозефом Нисефором Ньепсом (Nicéphore Niepce), но оно не сохранилось
до наших дней. Поэтому первой в истории фотографией считается снимок «вид из
окна», полученный Ньепсом в 1826 году с помощью камеры-обскуры на оловянной
пластинке, покрытой тонким слоем асфальта. Экспозиция длилась восемь часов при
ярком солнечном свете. Достоинством метода Ньепса было то, что изображение
получалось рельефным (после протравливания асфальта), и его легко можно было
размножить в любом числе экземпляров.
Var i,j,k:integer;
begin
for i:=1 to 9 do
for j:=0 to 9 do
for k:=0 to 9 do
if ((i*100+j*10+k) div 11) = (i*i+j*j+k*k)
then writeln(i*100+j*10+k);
end.
Результат:
131
241
324
550
624
803
900
910
Если требуется деление на 11 без остатка, то:
var i,j,k:integer;
begin
for i:=1 to 9 do
for j:=0 to 9 do
for k:=0 to 9 do
if ((i*100+j*10+k) mod 11) = 0 then
if ((i*100+j*10+k) div 11) = (i*i+j*j+k*k)
then writeln(i*100+j*10+k);
end.
Результат:
<span>550
803</span>
1. Представление информации в компьютере, единицы измерения информации В ЭВМ применяется двоичная система счисления, т.е. все числа в компьютере представляются с помощью нулей и единиц, поэтому компьютер может обрабатывать только информацию, представленную в цифровой форме.
2. Принято называть системой счисления
3.• устройства ввода информации
• устройства обработки информации
• устройства хранения
• устройства вывода информации.
По другому: системный блок, монитор, клавиатура и мышь
4.частота. В герцах (Гц)