Add Papers Marked0
Paper checked off!

Marked works


Viewed works

Shopping Cart0
Paper added to shopping cart!

Shopping Cart

Register Now

internet library library

Great deal: today with a discount!

Regular price:
You save:
0,60 (11%)
Discounted price*:
Add to Wish List
ID number:717224
Published: 02.01.2019.
Language: Latvian
Level: College/University
Literature: n/a
References: Not used

5. Testpiemēru kopa
Lai pārliecinātos par programmas pareizību izdarīsim sekojošus vienkāršojumus:
Ievadīsim trīs lielumus a,b,c un veiksim salīdzināšanu, lai noskaidrotu, kura no vērtībām ir lielākā un kura mazākā vērtība, un no lielākās vērtības atņemsim mazāko vērtību:
Ja a=1, b=2, c=3, tad D= 3-1=2
Ja a=4, b=2, c=1, tad D=4-1=3
Ja a=5, b=1, c=3, tad D=5-1=4
Ja a=1, b=7,c=2, tad D=7-1=6

6. Programmas pirmteksts
Public Sub RING()
Dim a As Single, b As Single, c As Single
Dim S As Single
Dim Max As Single, Min As Single
a = CSng(InputBox("ievadi a vertibu"))
b = CSng(InputBox("ievadi b vertibu"))
c = CSng(InputBox("ievadi c vertibu"))
' operatora p?rnese uz n?košo rindu
If a > b And a > c Then Max = a

Author's comment
Load more similar papers

Send to email

Your name:

Enter an email address where the link will be sent:

{Your name} suggests you to check out this paper on „Pirmais laboratorijas darbs "Visual Basic"”.

Link to paper:


Email has been sent

Choose Authorization Method

Email & Password

Email & Password

Wrong e-mail adress or password!
Log In

Forgot your password?


Not registered yet?

Register and redeem free papers!

To receive free papers from it is necessary to register. It's quick and will only take a few seconds.

If you have already registered, simply to access the free content.

Cancel Register