Zadání:
Sestavte program, který vypočte z hodnoty
x hodnotu
y podle vzorce (a,b,c,d jsou parametry, zadávané z klávesnice):
Řešení:
Pomocí standardních funkcí programovacího jazyku vypočítat z hodnoty x a parametrů a,b,c,d hodnotu y.
Module Module1
Sub Main()
Dim a, b, c, d, x, y As Double
Console.Write("Zadejte koeficient a: ")
a = Console.ReadLine
Console.Write("Zadejte koeficient b: ")
b = Console.ReadLine
Console.Write("Zadejte koeficient c: ")
c = Console.ReadLine
Console.Write("Zadejte koeficient d: ")
d = Console.ReadLine
Console.Write("Zadejte hodnotu x: ")
x = Console.ReadLine
If c * x + d <> 0 Then
y = (a * x + b) / (c * x + d)
Console.WriteLine("Hodnoty funkce y = {0:0.000}", y)
Else
Console.WriteLine("Vypocet nelze provest")
End If
Console.ReadLine()
End Sub
End Module
program ke stažení
Pro studenty:
Při převodu do programovacího jazyku je třeba dát si pozor ve zlomcích na správné použití závorek.
Pro učitele:
Vysvětlit použití závorek ve zlomcích.
Lze také řešit v celých číslech