С помощью гиперссылки можно перейти с сайта на другую страницу. Достаточно одного клика по гиперссылке. Ее так и назвали, потому, что за одну секунду переводит на другую страничку или другой сайт.
Var a,b: integer;
begin
readln (a,b);
if (a mod 2 = 0) then writeln ('Число ',a, ' чётное.') else writeln ('Число ',a, ' нечётное.');
if (b mod 2 = 0) then writeln ('Число ',b, ' чётное.') else writeln ('Число ',b, ' нечётное.');
<span>end.</span>
#include <iostream>
<span>#include <cmath>
</span><span>using namespace std;
</span>int main() {
<span> float x,y,z,t,ks;
</span><span> t=3.0;
</span><span> cout<<"x = "; cin>>x;
</span><span> cout<<"y = "; cin>>y;
</span><span> cout<<"z = "; cin>>z;
</span><span> ks=abs(pow(x,y/x)-pow(y/x,1/t))+(y-x)*
</span><span> (cos(y)-z/(y-x))/(1+pow((y-x),2));
</span><span> cout<<ks<<endl;
</span><span> system("pause");
</span><span> return 0;
</span><span>}
x = 1.825e2
y = 18.225
z = -3.298e-2
1.2132
</span>
// PascalABC.Net 3.0, сборка 1052
const
nn=100;
var
a:array[1..nn] of integer;
p,s:longint;
i,n:byte;
begin
Write('Введите количество элементов в массиве: '); Read(n);
Writeln('Вводите целочисленные элементы массива через пробел');
s:=0; p:=1;
for i:=1 to n do begin
Read(a[i]);
if i mod 2 = 0 then p:=p*a[i];
s:=s+a[i]
end;
Writeln('Произведение элементов с четными номерами: ',p);
Writeln('Среднее арифметическое элементов: ',s/n)
end.
<em><u>Тестовое решение:</u></em>
Введите количество элементов в массиве: 10
Вводите целочисленные элементы массива через пробел
-4 6 11 8 12 21 7 13 9 -15
Произведение элементов с четными номерами: -196560
Среднее арифметическое элементов: 6.8
1. Е3
2.=B3*B3-4*B2*B4
3.C1=-6 C2=7 C3=-79 D1=1 D2=87 D3=1:87