17034

Умовні оператори циклу і переклад в інших системах числення в Visual BASIC

Лабораторная работа

Информатика, кибернетика и программирование

Лабораторна робота №12 Тема. Умовні оператори циклу і переклад в інших системах числення Мета: відробити прийоми використання умовних циклів і розглянути переклад у системи числення за допомогою VB 6.0. Обладнання: ПК ПЗ VB 6.0. Хід роботи Індивідуальне завдання. ...

Украинкский

2013-06-29

45.5 KB

5 чел.

Лабораторна робота №12

Тема. Умовні оператори циклу і переклад в інших системах числення

Мета: відробити прийоми використання умовних циклів і розглянути переклад у системи числення  за допомогою VB 6.0.

Обладнання: ПК, ПЗ VB 6.0.

Хід роботи

Індивідуальне завдання.

Скласти програму в VB 6.0 для розв’язання задачі.

19

Чи різні цифри  2-го представлення?

Листинг

Результат

Private Sub Command1_Click()

Dim X As Integer, s As Integer

X = Text1.Text

Do Until X = 0

Y = X Mod 2

X = X \ 2

z = X Mod 2

If Y <> z Then Exit Do

Loop

If X = 0 Then Text2.Text = "Одинаковые"

If X <> 0 Then Text2.Text = "Не Одинаковые"

End Sub

Контрольні питання.

  1.  Використання циклів типу Do While.
  2.  Використання циклів типу dо  Until.
  3.  Призначення функцій «\», «mod».
  4.  Переклад чисел в системах числення.


 

А также другие работы, которые могут Вас заинтересовать

53927. Шкільний КВК ,,Люби, вивчай рідну мову!’’ 70 KB
  Ведучий: Кожному народові дорога його мова Ведучий: УвагаУвагаУвага Розпочинаємо змагання на кращих знавців рідного слова між командами 6х класів.Перемагає та командаяка правильно і найшвидше це зробить КОНКУРС КАПІТАНIB Скажи без затримки†Учитель чітко називає дібрані слова що мають антоніми. Префікс від слова перенестикорінь від слова казати переказ 2. Корінь від слова квітка суфіксвід слова вудочка закінченнявід слова зірка квіточка 3.
53928. КВН «В мире точных наук» 50.5 KB
  Жюри вам не помеха Добьетесь вы успеха. Для чего же КВН веселее жить Для чего командам в бой что бы победить Для чего нужно жюри что бы правде быть Для чего же капитан чтоб руководить Звучит песня: Мы начинаем КВН Выходят две команды и садятся каждая на свое место. Заповеди КВНа: Проиграл не расстраивайся в следующий раз выиграешь Выиграл не обольщайся в следующий раз проиграешь Уважаемое жюри О справедливости вашей можно будет судить по весам правосудия. И пусть жюри определит Того из нас кто победит.
53929. КВК «Do you know English» 36 KB
  Where do you live? What season is it now? What is the weather like today? What month is it now? What form are you in?
53930. КВК «КРИЛАТІ ВИСЛОВИ. ФРАЗЕОЛОГІЗМИ» 76.5 KB
  Багата людина в змодельованому взутті розміром 50см з загнутим носом і Бідна людина у взутті 30см Фламінго: Раніше в Україні багаті люди носили червоні чоботи. Люди середнього достатку жовті чоботи. А найбідніші мали чорні чоботи а то й зовсім були безчобітними. Ті хто хотіли відрізнитися від зовсім бідних носили чоботи 2 кольорів: нижня частина чорна а халяви червоні або жовті.
53931. КВК (математичний) у 1 класі 119.5 KB
  Якщо олівець перерізати двічіто скільки буде олівців3. Двоє білих наче сніг Одне чорне скільки всіх 3 З. Скільки дітей йшло до школи 6 хлопчиків. Скільки склянок залишилось 3 6.
53932. ГЕОГРАФІЧНИЙ КВК СЕРЕД 6-Х КЛАСІВ «ЄВРО-2012» 113.5 KB
  Присутні: учні 6х класів команди класів класні керівники члени журі Обладнання: настінна політична карта Європи переносна дошка прапори європейських державучасниць фінальної стадії чемпіонату таблиці розклади матчів символи чемпіонату Мета: розширення асоціативного навчального поля при вивченні учнями географії навчання дітей формулювати висловлювати аргументувати свої думки вмінню спілкуватися працювати в команді виховання інтересу до географії з допомогою викликання емоційного піднесення розвиток творчості і фантазії дітей...
53933. Дитячий світ – країна мрій 41 KB
  Птахи зібралися у великі зграї але не можуть відлетіти в теплі краї поки їх не покличуть лагідно. Гра Поклич лагідно пташку Ластівка ластівочка зозуля зозулька журавель журавлик шпак шпачок чапля чапелька соловей соловейко лелека лелеченька жайворонок жайвороночок б. Гра Зайвий гриб Опеньок білий гриб мухомор лисички. Гра...
53934. КВК з математики 2 клас 49 KB
  Мета. У цікавій формі закріпити одержані знання з математики; розвивати мислення, память,вміння спілкуватись. Виховувати почуття дружби, інтерес до математики.
53935. Люби, вивчай українські пісні 30 KB
  Мета: узагальнити, перевірити та оцінити набуті знання учнів, розвивати аналітичні,логічні та творчі здібності, виховувати любов до пісні та рідного краю.