Add Papers Marked0
Paper checked off!

Marked works

Viewed0

Viewed works

Shopping Cart0
Paper added to shopping cart!

Shopping Cart

Register Now

internet library
Atlants.lv library
FAQ

Great deal: today with a discount!

Regular price:
6,49
You save:
0,84 (13%)
Discounted price*:
5,65
Purchase
Add to Wish List
ID number:717224
Author:
Evaluation:
Published: 02.01.2019.
Language: Latvian
Level: College/University
Literature: n/a
References: Not used
Extract

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:

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

Link to paper:
https://eng.atlants.lv/w/717224

Send

Email has been sent

Choose Authorization Method

Email & Password

Email & Password

Wrong e-mail adress or password!
Log In

Forgot your password?

Draugiem.pase
Facebook
Twitter

Not registered yet?

Register and redeem free papers!

To receive free papers from Atlants.com 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