#1.
var n,i,flag:integer;
begin
readln (n);
flag:=0;
while n>0 do
begin
i:=n mod 10;
n:=n div 10;
flag:=flag+1;
end;
if (flag = 2)
then writeln ('Это число двузначное')
else
writeln ('Число не является двузначным');
end.
#2.
var n:integer;
begin
readln (n);
if (n mod 2 = 0) then
writeln ('Это число четное')
else
writeln ('Число не является четным');
end.
Количество слов или страниц или символов. Как-то так
Объяснение:
Using System;
class Program
{
public static void Main()
{
double x,y;
for (x = 0; x <= 12; x++)
{
y = Math.Sqrt(Math.Log(x*x-3*x+2));
Console.WriteLine("x = {0}, y = {1}", x, y);
}
Console.ReadKey();
}
}
Результат:
<span>x = 0, y = 0.832554611157698
x = 1, y = NaN
x = 2, y = NaN
x = 3, y = 0.832554611157698
x = 4, y = 1.33856619904585
x = 5, y = 1.57635866787606
x = 6, y = 1.73081838260229
x = 7, y = 1.84423354856758
x = 8, y = 1.93330536084794
x = 9, y = 2.00632791206601
x = 10, y = 2.06801018348945
x = 11, y = 2.1212754819519
x = 12, y = 2.16805912414593
PS. NaN - функцию невозможно вычислить при данном значении аргумента.</span>