10 rem
20 input d
30 let k=4.3*sin(exp(<span>1/d)+2)/(d+2,1)-6,7*d
40 print "k=";k
50 end
</span>
Во вложении
спрашивайте, что непонятно
static void Main(string[] args)
{
Console.WriteLine("Введите a");
int a = Convert.ToInt32(Console.ReadLine());
Console.WriteLine("Введите b");
int b = Convert.ToInt32(Console.ReadLine());
Console.WriteLine("{0}+{1} = {1}+{0} = {2}", a, b, a + b);
Console.ReadKey();
}
Ответ:
var
a: array [1..3] of Integer;
i, imin: Integer;
begin
for i := Low (a) to High (a) do begin
Write (i, ' число: ');
ReadLn (a [i]);
end;
imin := 0;
for i := Low (a) to High (a) do begin
if a [i] mod 2 = 0 then
if imin = 0 then
imin := i
else if a [i] < a [imin] then
imin := i;
end;
if imin <> 0 then
WriteLn ('Наименьшее четное = ', a [imin])
else
WriteLn ('Четных чисел нет.');
ReadLn;
end.
Первое - дробная часть, 0.1
Второе - результат целочисленного деления, 1