Логарифмiчний калькулятор

Реалізація в Pascal ABC.NET

Uses CRT;

var a,b:real;

begin

writeln ('Логарифмiчний калькулятор');

write ('Основа = ');

readln (a);

write ('Число = ');

readln (b);

write (ln(b)/ln(a));

readln;

end.

Реалізація в С#

using System;

namespace HelloApp

{

class Program

{

static void Main(string[] args)

{

Console.WriteLine("Логарифм");

Console.Write("Основа А = ");

double a = Convert.ToDouble(Console.ReadLine());

Console.Write("Число Х = ");

double b = Convert.ToDouble(Console.ReadLine());

double c = Math.Log(b) / Math.Log(a);

Console.Write("Вiдповiдь = "+ c);

Console.ReadKey();

}

Реалізація в dev-c++

#include <conio.h>

#include <iostream>

#include <cmath>

int main(void)

{

double a,b,s,r,m,d;

setlocale(LC_ALL, "");

std::cout << "Калькулятор логарифмiв\n \n";

std::cout << "Основа А = ";

std::cin >> a;

std::cout << "Число В = ";

std::cin >> b;

d=log(b)/log(a);

std::cout

<< "\nЛогарифм = "<< d << std::endl;

getch();

return 0;

}

Реалізація в Python

print('Логарифмiчний калькулятор')

import math

a=int(input('Основа = '))

b=int(input('Число = '))

print (math.log(b)/math.log(a))

input()

Реалізація в Small Basic

TextWindow.WriteLine ("Логарифмiчний калькулятор")

TextWindow.Write ("Основа = ")

a=TextWindow.ReadNumber()

TextWindow.Write ("Число = ")

b=TextWindow.ReadNumber()

TextWindow.Write ( Math.NaturalLog(b)/Math.NaturalLog(a))

Реалізація в С

#include <stdio.h>

#include < math.h >

int main(void)

{

float a,b;

printf ("‹®Ј аЁд¬iзЁ© Є «мЄг«пв®а \n");

printf ("Ћб®ў = ");

scanf("%f", &a);

printf ("—Ёб«® = ");

scanf("%f", &b);

printf ("%.20f\n", log(b)/log(a));

scanf("\n");

return 0;

}

Реалізація в java

<title>Математичний калькулятор</title>

<b>Логарифм</b>

<br>

Основа А = <input name="A" type="text" value=" " size="4"></b>

Число Х = <input name="X" type="text" value=" " size="4"></b>

<br>

</form>

Відповідь: <br> <span id="mat">Введіть данні і нажміть "Порахувати"</span>

</div>

function mat() {

var A = document.mat.A.value;

var X = document.mat.X.value;

var sol = document.getElementById("mat");

var L = Math.log(X)/Math.log(A);

string = "LOG = "+L;

sol.innerHTML = string;

}

</script>

Реалізація в VB.NET

Class Program

Shared Sub Main()

Console.WriteLine("Логарифм")

Console.Write("Основа А = ")

Dim a As Double = Convert.ToDouble(Console.ReadLine())

Console.Write("Число Х = ")

Dim b As Double = Convert.ToDouble(Console.ReadLine())

Dim c As Double = Math.log(b)/Math.log(a)

Console.Write("Вiдповiдь = {0}",c)

Console.ReadLine()

End Sub

End Class

Реалізація в QBasic

PRINT "Љ «мЄг«пв®а «®Ј аЁд¬iў"

INPUT "‚ўҐ¤iвм ®б®ўг = "; a

INPUT "‚ўҐ¤iвм зЁб«® = "; b

c = LOG(b) / LOG(a)

PRINT "‹®Ј аЁд¬ = "; c

INPUT z