М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
112811281128
112811281128
25.11.2021 06:20 •  Информатика

Призначення функції Countif в іть будь ласка

👇
Ответ:
us6ipi2013
us6ipi2013
25.11.2021

Відповідь:

Це функція, яка до знайти, скільки разів у виділеному проміжку згадується потрібне число або слово. У більш старих версіях використання функції виглядало так "=COUNTIF(проміжок/клітинки де шукаємо; число/слово, яке шукаємо)". Іншими словами, якщо тобі потрібно визначити скільки разів у списку використовується твоє ім'я - ця фукція це зробить.

4,8(22 оценок)
Открыть все ответы
Ответ:
// PascalABC.NET 3.2, сборка 1370 от 24.12.2016
// Внимание! Если программа не работает, обновите версию!

begin
  Writeln('*** Исходный массив ***');
  var a:=MatrRandom(5,5,-50,50);
  a.Println(4); Writeln(4*a.ColCount*'-');
  Writeln('*** Транспонированный массив ***');
  a:=Transpose(a);  a.Println(4)
end.

Пример
*** Исходный массив ***
  40 -31  16 -27  -3
  34 -37   0 -33  -8
 -16 -44 -38  19 -22
 -32  36 -22  42 -17
 -31  20  36   8   9

*** Транспонированный массив ***
  40  34 -16 -32 -31
 -31 -37 -44  36  20
  16   0 -38 -22  36
 -27 -33  19  42   8
  -3  -8 -22 -17   9
4,8(22 оценок)
Ответ:
Roma99812
Roma99812
25.11.2021
Если следовать алгоритму вычисления, представленному в формуле, то программа будет такая:

var
  n,i,s: shortint ;
begin
  write ('N=');
  readln (n);
  s:=0;
  for i:=1 to n do 
    if i mod 2 =0 
      then s:=s-i
      else s:=s+i;
  print (s)
end.

Если же посмотреть на формулу внимательно и выявить закономерность, то можно увидеть, что 

1) вычитаются только четные числа. И после каждого вычитания результат равен ровно половине вычитаемого числа (со знаком минус)
2) прибавляются только нечетные числа И прибавление идет вслед за вычитанием (кроме 1), т.е. можно к результату последнего вычитания (см.п.1) просто прибавить N.

Также учитываем, что целые числа занимают меньше памяти, чем вещественные, поэтому для программы используем самый маленький целый тип с отрицательными значениями shortint (от -128 до 127, что в данном случае нас вполне устраивает).

Помним, что значение переменной целого типа не может быть результатом деления, поэтому вместо обычного деления используем деление нацело (N div 2)

Итак:При нечетном N результат = -N div 2,
При четном N: (так как у нас целочисленное деление, то N div 2 будет равно (N-1) div 2) результат будет = -(N div 2) + N или N-(N div 2)
Т.е. вся программа сведена всего к двум операциям по разным веткам условного оператора, что сделает ее быстрее и экономичнее. К тому же не надо выделять память для переменной-счетчика.

var
  n,s: shortint;
begin
  write ('N=');
  readln (n);
  if n mod 2 =0
    then s:=-n div 2
    else s:=n-(n div 2);
  print (s)
end.

Можно увидеть и другую закономерность, что каждое сложение и идущее за ним вычитание дают одинаковый результат с разными знаками, т.е. при четном N также s=-N div 2, а при нечетном -  s=N div 2+1. Но большой разницы это не даст.
4,5(86 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ