chumakanna17
?>

Написать программу в бейсике для этой : заполнить массив а(15) таким образом, чтобы нечетные были равны нулю, а четные единице.

Информатика

Ответы

natanikulina1735
Самое простое, заполнить только четные элементы, т.к. в нечетных по умолчанию уже ноль стоит)) dim a(15) for i = 2 to 15 step 2     a(i) = 1 next i если нужно увидеть массив, можно дополнить блоком вывода for i = 1 to 15     print a(i) next i ну, а если явным образом вписывать нули, то тогда так dim a(15) for i = 1 to 15 step 2     a(i) = 0 next i for i = 2 to 15 step 2     a(i) = 1 next i
maltes

для в допустим, что слева направо.

class birthdate{

private int day;

private int month;

private int year;

 

birthdate(int day, int month, int year){

  this.day = day;

  this.month = month;

  this.year = year;

}

public int getday() {

  return day;

}

public void setday(int day) {

  this.day = day;

}

public int getmonth() {

  return month;

}

public void setmonth(int month) {

  this.month = month;

}

public int getyear() {

  return year;

}

public void setyear(int year) {

  this.year = year;

}

 

public boolean isolder(birthdate bd) {

  return this.year > = bd.getyear() & & this.month > = bd.getmonth()   & & this.day > bd.getday();

}

}

class human{

private birthdate birthdate;

private string name;

 

human(string name, birthdate birthdate){

  this.birthdate = birthdate;

  this.name = name;

}

 

public birthdate getbirthdate(){

  return this.birthdate;

}

 

public void setbirthdate(birthdate bd) {

  this.birthdate = bd;

}

 

public string getname(){

  return this.name;

}

 

public void setname(string name) {

  this.name = name;

}

}

public class task {

 

private static boolean issumnumbertwodecimal(int number) {

  int sum = 0;

  while(true) {

  sum += number % 10;

  number /= 10;

  if(number < 1) {

    break;

  }

  }

  return sum < 100;

}

 

private static string whichseason(int month) {

  if(month > = 1 & & month < = 2 & & month == 12) {

  return "winter";

  } else if(month > = 3 & & month < = 5) {

  return "spring";

  } else if(month > = 6 & & month < = 8) {

  return "summer";

  } else if(month > = 9 & & month < = 11){

  return "autumn";

  } else {

  return "there's no such month";

  }

}

 

private static boolean issamefirstandsecond(int number, int numeral){

  string snbr = string.valueof(number).substring(0, 2);

  return integer.valueof(snbr) == numeral;

}

 

private static boolean isolder(human h1, human h2) {

  return h1.(h2.;

}

 

public static void main(string[] args) {

  int number = 2939393;

  system.out.println(issumnumbertwodecimal(number));

  //month and date has correct values

  int month = 10;

  human vasya = new human("vasya", new birthdate(1, month, 1990));

  human natalia = new human("natalia", new birthdate(1, month, 1989));

  system.out.println(isolder(vasya, natalia));

  system.out.println(whichseason(month));

  system.out.println(issamefirstandsecond(number, 29));

}

}

Yekaterina
Основная статья:   вычислительной техники

потребность считать возникала у людей вместе с появлением цивилизации. им было необходимо осуществлять торговые сделки, проводить землемерные работы, запасами урожая, следить за астрономическими циклами. для этого издревле были изобретены различные инструменты, от  счётных палочек  и  абака, в ходе развития науки и техники эволюционировавшие в  калькуляторы  и разнообразные вычислительные устройства, в том числе и персональные компьютеры.

важнейшие этапы развития вычислительной техники до появления персональных компьютеров[править  |  править вики-текст] механические и автоматические вычислительные средства[править  |  править вики-текст] v век до н. э.  —  абак  (счётная доска).1642  —  «паскалина»  блеза паскаля, первая попытка механизировать вычисления.1654  —  логарифмическая линейка, первое устройство, сделавшее вычисления быстрыми и получившее широкое распространение.1801  —  ткацкий станок  жозефа мари жаккара, изобретение  перфокарты.1820-е годы  —  арифмометр  томаса, первое механическое вычислительное устройство, получившее широкое распространение.1822-1838  —  разностная машина чарльза бэббиджа, первая попытка создать программируемое вычислительное устройство. электромеханические вычислительные средства[править  |  править вики-текст] 1888-1890  —  табулятор  холлерита, первое автоматическое вычислительное устройство, производившееся промышленными партиями. впоследствии (1896) герман холлерит основывает компанию  tabulating machine company, в  1924  году переименованную в  international business machines corporation  после промежуточной смены имени в 1911.1937  —  z1, вычислительная машина, разработанная  конрадом цузе, стала первым вычислительным устройством, работавшим на двоичной логике и применявшее  арифметику с плавающей запятой.1943  —  «марк i», первый компьютер, произведённый фирмой  ibm. электронные вычислительные средства[править  |  править вики-текст] 1946  —  eniac;   1948  —  манчестерская мэм «baby»;   1949  —  edsac  — первые  эвм.7 апреля  1964  г. фирма  ibm  объявила о создании семейства компьютеров  system 360  — первой серии масштабируемых компьютеров, впоследствии ставшая примером открытого стандарта, когда один производитель компьютерного оборудования мог произвести оборудование, совместимое с оборудованием другого производителя; широкое распространение system 360 де-факто установило стандарт  байта, состоящего из 8  битов, и ввело в широкое употребление  шестнадцатеричную систему счисления  в программировании. теоретические разработки, нашедшие применение в персональных компьютерах[править  |  править вики-текст] xvii век  — описание  лейбницем  двоичной системы счисления.1847-1854  — изобретение  булевой   на основе двоичной системы счисления.1940-1948  — понимание того, что работа логических электрических схем тождественна булевой и разработка  теории информации  клода шеннона.середина 1940-х  — разработка  архитектуры фон неймана.1957  — впервые реализован  язык программирования высокого уровня, носивший название  фортран.в  1964  г.  американская ассоциация стандартов принимает новый 7-битовый стандарт для обмена информации  ascii  (american standard code for information interchange).в  1964  г.  джон кемени  и  томас курц  в  дартмутском колледже, разработали  язык программирования  basic. этот язык программирования с различными модификациями применялся почти во всех персональных и компьютерах 1970-80-х годов.в  1973  г.  исследовательский центр  xerox parc  представил  xerox alto  — первый в мире образец компьютера с оконным (графическим) интерфейсом. появление технологий, нашедших применение в персональных компьютерах

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Написать программу в бейсике для этой : заполнить массив а(15) таким образом, чтобы нечетные были равны нулю, а четные единице.
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

sjmurko
webotryvclub21
purbuevat56524
sn009
Ромеовна1527
Ромеовна1527
delo1005
bogdanovaoksa
Dampil
corneewa20096
Annabill1987
Prostofil200790
tanias
Dampil
nzaripova313