3220342499
Przykład 8.
' Dim A as Integer
For A = 1 To 10 Step 2 Print "Wartość A " ; A % Next A
Ćwiczenie 14. Zmodyfikuj przykład 7 tak, aby
a) Zliczanie odbywało się od 10 do 50 z krokiem 5
b) Zliczanie odbywało się od 20 do 10 z krokiem -1
c) Zliczanie odbywało się od -20 do 0 z krokiem 1
6. Przykładowe zadania na kolokwium
Poza zadaniami z laboratorium obowiązuje znajomość następujących zagadnień:
1. Jakiego rodzaju błędy wykrywa kompilator?
2. Co zawiera plik *.bas, a co plik *.hex?
3. Jakie wartości wyświetli program
Dim A as Byte
A - 3.7 Print A
A - 255 A = A + 2 Print A
A = 11 A = A / 2 Print A_
4. Przerób poniższy program na wersje wykorzystującą instrukcję else
Wyszukiwarka
Podobne podstrony:
Zadanie 4 Sub tabela() Dim i As Integer Dim j As Integer Dim x As Integer x = 1 For i = AcZadanie 4 Sub tabela() Dim i As Integer Dim j As Integer Dim x As Integer x = 1 For i = Ac16vel02 Sub CallProcO Dim I, J As integer Dim K As Single : i—i—r Cali RecProc(I, J, K) End Sub17ddg01 Modulel333 Objęci: (General) Proc: IsLoaded Dim i IsLoaded = False For i = 0 To Forms.Countzdj4 (5) Dobre rady Rozmieszczanie instrukcji, akapity a:=14: for i:=1 to 10 do begin x[i]:=0; h:=i26289 zdj4 (5) Dobre rady Rozmieszczanie instrukcji, akapity a:=14: for i:=1 to 10 do begin x[i]:=070225 zdj0 Obliczanie wzorów - program fuiu tion vzor(F(n. n)): integer begin var: i. j integer: fo26289 zdj4 (5) Dobre rady Rozmieszczanie instrukcji, akapity a:=14: for i:=1 to 10 do begin x[i]:=0T.Ziębakowski: PROGRAMOWANIE MAKR ... strona 11 Sub obszar() Dim n As Integer, w As Integer, k As In00270 d021c6388981baccfa088288e9ff089 272 Montgomery Choice of Factors and Levels As noted in TableAlgorytmy i VBA Sub Min_z_dwustu() Dim x As Double x = Cells(l, 1) For i = 2 To 200 If x > Cells(Hope Walker, Sarah Unfinished Business BS 23 £; £ baEroticJiction written by women for women Asprogress test 4 4 For questions 1-10, complete the second sentence so that it has a similar meaningwięcej podobnych podstron