Перевод программы с pascal на qbasic решение: var a, s: integer; begin s: = 0; readln(a); while a< > 0 do begin if (a mod 6 = 0) and (a mod 10 = 4) then s : = s + a; readln(a); end; writeln(s) end.

DIM a AS INTEGER, s AS INTEGER
s = 0
INPUT a
DO WHILE a <> 0
   IF (a MOD 6 = 0) AND (a MOD 10 = 4) THEN
      s = s + a
   END IF
   INPUT a
LOOP
PRINT s

Объект в программировании — некоторая сущность в виртуальном пространстве, обладающая определённым состоянием и поведением, имеющая заданные значения свойств (атрибутов) и операций над ними (методов) [1]. Как правило, при рассмотрении объектов выделяется то, что объекты принадлежат одному или нескольким классам, которые определяют поведение (являются моделью) объекта. Термины «экземпляр класса» и «объект» взаимозаменяемы. [2]

Объект, наряду с понятием класс, является важным понятием объектно-ориентированного подхода. Объекты обладают свойствами наследования, инкапсуляции и полиморфизма [1].

відповідь: function showresult(choise){

var n1=parsefloat(document.getelementbyid('num1').value);

var n2=parsefloat(document.getelementbyid('num2').value);

var r;

var c=choise;

switch(c)

{

case '1':

  r=n1+n2;

  break;

case '2':

  r=n1-n2;

  break;

case '3':

  r=n1*n2;

  break;

case '4':  

  r=n1/n2;

  break;

case '5':

  r=n2*100/n1;

  break;

default:

  break;

   

}

document.getelementbyid('result').value=r;

 

}

calculator

my calculator first number second number result

+

-

*

/

%

пояснення: