Petrushin482
?>

Как сделать эту в экселе, подскажите / ms office excel задан массив b1, b2, b3, … bn. все элементы, равные 7 заменить единицей и подсчитать количество таких элементов. заранее большое

Информатика

Ответы

Иванов1813
Пример реализации на vba excel 2003
Антонович937

var

  a: array [1..12] of integer;   //массив, состоящий из 12 целых чисел

  i: integer;

 

begin

  for i: = 1 to 12 do   //вводим элементы массива

  begin

    writeln('введите а[', i, ']');

    readln(a[i]);

  end;

  write('исходный массив:   ');

  for i: = 1 to 12 do   {распечатываем исходный массив и заменяем все положительные четные элементы на 5}

  begin

    write(a[i], '   ');

    if (a[i] > 0) and (a[i] mod 2 = 0) then

      a[i]: = 5;

  end;

  writeln;

  write('измененный массив:   ');

  for i: = 1 to 12 do   //распечатываем измененный массив

    write(a[i], '   ');

  writeln;   {переход на новую строку, чтобы при следующем запуске программы информация выводилась с новой строки}

end. 

если все правильно, отметь решение как лучшее)

poiskmarina

1."солнце" - круг с точкой в центре

"идти" - две ноги

"хлеб" - полукруг

"рот" - сильно вытянутый   полуовал

 

2.во времена древнего, среднего и нового царств количество иероглифов приблизительно равнялось 800, a в греко римский период их число превысило 6000 иероглифов.

3.  в древнем египте наряду со значками , обозначавшими целые понятия и слова, существовали и другие знаки, обозначавшие слоги и даже отдельные звуки . потребность в таких знаках очевидна, так как не все можно выразить в виде изображений (прежде всего, это касается личных имен).  в этих случаях египтяне превращали слова иероглифы в буквы иероглифы, из которых и составлялись слова, подлежащие передаче на письме согласно их звучанию. например иероглиф «хт» — изображение дома — сделался двухбуквенным иероглифом, обозначающим звук [хт], иероглиф «мн» — изображение шахматной доски — стал иероглифом, обозначающим два звука [мн] и т.д. на первых порах значение фонетических иероглифов было , но со временем их роль все более возрастала, и в последние века существования египетской письменности значение фонетических иероглифов стало господствующим. но к чисто фонографическому письму (то есть такому, где каждый знак обозначает отдельный звук или букву) египтяне так и не перешли . это важное усовершенствование было сделано в письме других народов.

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

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

Как сделать эту в экселе, подскажите / ms office excel задан массив b1, b2, b3, … bn. все элементы, равные 7 заменить единицей и подсчитать количество таких элементов. заранее большое
Ваше имя (никнейм)*
Email*
Комментарий*