KNOWLEDGE HYPERMARKET


Практическая работа на тему: Язык программирования Basic
(Новая страница: «<metakeywords>Гіпермаркет Знань - перший в світі!, Гіпермаркет Знань, Інформатика 8 клас, клас, уро...»)
 
Строка 9: Строка 9:
<br> <br>Розгляд теми: Поняття про мову програмування, обєктно-орієнтовані мови програмування, мова програмування Delphi.<br>  
<br> <br>Розгляд теми: Поняття про мову програмування, обєктно-орієнтовані мови програмування, мова програмування Delphi.<br>  
 +
<br>
 +
<br> '&nbsp;&nbsp;&nbsp; ПРОГРАММА&nbsp; CALC-01<br>CLS&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 'Очистка экрана<br>PRINT "ЗАДУМАЙТЕ ЧИСЛО";&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 'Вывод на дисплей сообщения<br>INPUT x&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 'Ввод числа x<br>PRINT "И ЕЩЕ ОДНО";&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 'Вывод на дисплей сообщения<br>INPUT y&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 'Ввод второго числа y<br>PRINT "ВАМ ХОТЕЛОСЬ БЫ:"&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 'Вывод на дисплей сообщения<br>PRINT "СЛОЖИТЬ,ВЫЧЕСТЬ,РАЗДЕЛИТЬ,ПОДЕЛИТЬ НАЦЕЛО" 'Вывод на 'дисплей сообщения<br>PRINT "ИЛИ УМНОЖИТЬ?"&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 'Вывод на дисплей сообщения<br>INPUT A$&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 'Ввод строки A$<br>IF A$ = "СЛОЖИТЬ" THEN A = x + y&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 'Действие в соответствии с значением A$<br>IF A$ = "ВЫЧЕСТЬ" THEN A = x - y&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 'Действие в соответствии с значением A$<br>IF A$ = "РАЗДЕЛИТЬ" THEN A = x / y&nbsp;&nbsp;&nbsp;&nbsp; 'Действие в соответствии с значением A$<br>IF A$ = "ПОДЕЛИТЬ НАЦЕЛО" THEN A = x \ y'Действие в соответствии с 'значениемA$<br>IF A$ = "УМНОЖИТЬ" THEN A = x * y&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 'Действие в соответствии с значением A$<br>PRINT "Ответ равен:"; A&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 'Вывод результата A<br>END&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 'конец<br><br>
-
<br> '&nbsp;&nbsp;&nbsp; ПРОГРАММА&nbsp; CALC-01<br>CLS&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 'Очистка экрана<br>PRINT "ЗАДУМАЙТЕ ЧИСЛО";&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 'Вывод на дисплей сообщения<br>INPUT x&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 'Ввод числа x<br>PRINT "И ЕЩЕ ОДНО";&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 'Вывод на дисплей сообщения<br>INPUT y&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 'Ввод второго числа y<br>PRINT "ВАМ ХОТЕЛОСЬ БЫ:"&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 'Вывод на дисплей сообщения<br>PRINT "СЛОЖИТЬ,ВЫЧЕСТЬ,РАЗДЕЛИТЬ,ПОДЕЛИТЬ НАЦЕЛО" 'Вывод на 'дисплей сообщения<br>PRINT "ИЛИ УМНОЖИТЬ?"&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 'Вывод на дисплей сообщения<br>INPUT A$&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 'Ввод строки A$<br>IF A$ = "СЛОЖИТЬ" THEN A = x + y&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 'Действие в соответствии с значением A$<br>IF A$ = "ВЫЧЕСТЬ" THEN A = x - y&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 'Действие в соответствии с значением A$<br>IF A$ = "РАЗДЕЛИТЬ" THEN A = x / y&nbsp;&nbsp;&nbsp;&nbsp; 'Действие в соответствии с значением A$<br>IF A$ = "ПОДЕЛИТЬ НАЦЕЛО" THEN A = x \ y'Действие в соответствии с 'значениемA$<br>IF A$ = "УМНОЖИТЬ" THEN A = x * y&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 'Действие в соответствии с значением A$<br>PRINT "Ответ равен:"; A&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 'Вывод результата A<br>END&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 'конец<br><br><br><br>Оператор&nbsp;&nbsp; &nbsp;Результат&nbsp;&nbsp; &nbsp;Оператор&nbsp;&nbsp; &nbsp;Результат<br>PRINT 5 + 7 * 2 * 7<br>PRINT (5 + 7 * 2) * 7<br><br>PRINT 5 + 8 / 10 + 4<br>PRINT (5 + 8) / 10 + 4<br>PRINT 5 + 8 \ 10 + 4<br>PRINT (5 + 8) \ 10 + 4<br><br>PRINT 150 / 5 \ 4 / 2<br>PRINT 150 / (5 \ 4) / 2<br>PRINT (150 / 5 \ 4) / 2<br>^/*\Mod+-&nbsp;&nbsp; &nbsp;&nbsp;&nbsp; &nbsp;PRINT 2 + 3 MOD 7 - 2<br>PRINT (2 + 3) MOD (7 - 2)<br>PRINT 2 * 3 MOD 7 * 2<br>PRINT (2 * 3) MOD (7 * 2)<br><br>PRINT 100 / 5 ^ 2<br>PRINT (100 / 5) ^ 2<br><br>PRINT 50 * 5 \ 4 / 2<br>PRINT 50 / 5 * 4 / 2<br>PRINT 50 / 5 \ 4 * 2<br>&nbsp;&nbsp; &nbsp;<br><br>
+
{| cellspacing="1" cellpadding="1" border="1" style="width: 847px; height: 45px;"
-
 
+
|-
 +
| &nbsp; Оператор
 +
| &nbsp;&nbsp;&nbsp; Результат
 +
| &nbsp;&nbsp;&nbsp; Оператор
 +
| &nbsp;&nbsp;&nbsp; Результат
 +
|-
 +
| PRINT 5 + 7 * 2 * 7<br>PRINT (5 + 7 * 2) * 7<br><br>PRINT 5 + 8 / 10 + 4<br>PRINT (5 + 8) / 10 + 4<br>PRINT 5 + 8 \ 10 + 4<br>PRINT (5 + 8) \ 10 + 4<br><br>PRINT 150 / 5 \ 4 / 2<br>PRINT 150 / (5 \ 4) / 2<br>PRINT (150 / 5 \ 4) / 2<br>^/*\Mod+- <br>
 +
|
 +
| PRINT 2 + 3 MOD 7 - 2<br>PRINT (2 + 3) MOD (7 - 2)<br>PRINT 2 * 3 MOD 7 * 2<br>PRINT (2 * 3) MOD (7 * 2)<br><br>PRINT 100 / 5 ^ 2<br>PRINT (100 / 5) ^ 2<br><br>PRINT 50 * 5 \ 4 / 2<br>PRINT 50 / 5 * 4 / 2<br>PRINT 50 / 5 \ 4 * 2
 +
|
 +
|}
 +
<br><br><br>&nbsp; &nbsp;&nbsp;&nbsp; <br>
 +
<br>
 +
<br>
Надіслано вчителем інформатики Черненко В.В.  
Надіслано вчителем інформатики Черненко В.В.  

Текущая версия на 16:41, 10 мая 2011

Гіпермаркет Знань>>Інформатика>>Інформатика 8 клас>> Інформатика: Поняття про мову програмування, обєктно-орієнтовані мови програмування, мова програмування Delphi.

Практична робота до предмету Інформатика 8 клас.

Тема «Язык программирования BASIC».



Розгляд теми: Поняття про мову програмування, обєктно-орієнтовані мови програмування, мова програмування Delphi.



'    ПРОГРАММА  CALC-01
CLS                                            'Очистка экрана
PRINT "ЗАДУМАЙТЕ ЧИСЛО";                       'Вывод на дисплей сообщения
INPUT x                                        'Ввод числа x
PRINT "И ЕЩЕ ОДНО";                            'Вывод на дисплей сообщения
INPUT y                                        'Ввод второго числа y
PRINT "ВАМ ХОТЕЛОСЬ БЫ:"                       'Вывод на дисплей сообщения
PRINT "СЛОЖИТЬ,ВЫЧЕСТЬ,РАЗДЕЛИТЬ,ПОДЕЛИТЬ НАЦЕЛО" 'Вывод на 'дисплей сообщения
PRINT "ИЛИ УМНОЖИТЬ?"                          'Вывод на дисплей сообщения
INPUT A$                                       'Ввод строки A$
IF A$ = "СЛОЖИТЬ" THEN A = x + y       'Действие в соответствии с значением A$
IF A$ = "ВЫЧЕСТЬ" THEN A = x - y       'Действие в соответствии с значением A$
IF A$ = "РАЗДЕЛИТЬ" THEN A = x / y     'Действие в соответствии с значением A$
IF A$ = "ПОДЕЛИТЬ НАЦЕЛО" THEN A = x \ y'Действие в соответствии с 'значениемA$
IF A$ = "УМНОЖИТЬ" THEN A = x * y      'Действие в соответствии с значением A$
PRINT "Ответ равен:"; A                'Вывод результата A
END                                    'конец

  Оператор     Результат     Оператор     Результат
PRINT 5 + 7 * 2 * 7
PRINT (5 + 7 * 2) * 7

PRINT 5 + 8 / 10 + 4
PRINT (5 + 8) / 10 + 4
PRINT 5 + 8 \ 10 + 4
PRINT (5 + 8) \ 10 + 4

PRINT 150 / 5 \ 4 / 2
PRINT 150 / (5 \ 4) / 2
PRINT (150 / 5 \ 4) / 2
^/*\Mod+-
PRINT 2 + 3 MOD 7 - 2
PRINT (2 + 3) MOD (7 - 2)
PRINT 2 * 3 MOD 7 * 2
PRINT (2 * 3) MOD (7 * 2)

PRINT 100 / 5 ^ 2
PRINT (100 / 5) ^ 2

PRINT 50 * 5 \ 4 / 2
PRINT 50 / 5 * 4 / 2
PRINT 50 / 5 \ 4 * 2




     



Надіслано вчителем інформатики Черненко В.В.

Бібліотека з підручниками та книгами на скачку безкоштовно онлайн, Інформатика для 8 класу скачати, шкільна програма з інформатики, плани конспектів уроків

Предмети > Інформатика > Інформатика 8 клас > Поняття про мову програмування, обєктно-орієнтовані мови програмування, мова програмування Delphi > Поняття про мову програмування, обєктно-орієнтовані мови програмування, мова програмування Delphi. Практикуми, лабораторні, кейси