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

Чему будет равно значение переменной а после выполнения фрагмента программы? a:=10;

if a mod 2<>0 then a:=0

else a:=1;

1
0
10
5

👇
Ответ:
dfgdfh2
dfgdfh2
19.04.2023

ответ: 1

Объяснение: остатка нет, присваивается 1

4,6(26 оценок)
Открыть все ответы
Ответ:
Крипер1111111
Крипер1111111
19.04.2023
// PascalABC.NET 3.1, сборка 1200 от 13.03.2016
begin
  var a:=MatrixRandom(7,7,0,9);
  var k:=0;
  for var i:=0 to 6 do begin
    for var j:=0 to 6 do begin
      Write(a[i,j]:3);
      if a[i,j] in [1..5] then Inc(k)
      end;
    Writeln
    end;
  Writeln('Кол-во элементов на [1,5]: ',k)
end.

Тестовое решение:
  2  1  7  3  3  2  7
  9  2  9  2  0  5  5
  4  2  6  9  4  6  0
  1  0  3  5  4  5  9
  6  3  6  0  2  0  8
  0  8  4  3  2  1  8
  6  0  4  4  5  4  0
Кол-во элементов на [1,5]: 27

Вариант "совсем для школы"

const
  n=7;
var
  a:array[1..n,1..n] of integer;
  i,j,k:integer;
begin
  Randomize;
  k:=0;
  for i:=1 to n do begin
    for j:=1 to n do begin
      a[i,j]:=Random(10);
      Write(a[i,j]:3);
      if a[i,j] in [1..5] then Inc(k)
      end;
    Writeln
    end;
  Writeln('Кол-во элементов на [1,5]: ',k)
end.
4,8(31 оценок)
Ответ:
арут4
арут4
19.04.2023

Объяснение:1.     В ячейке A1 ввести название аргумента Х.

2.     В ячейке A2 ввести название функции F(x).

3.     В ячейке B1 ввести начальное значение интервала табулирования 0.

4.     В строке меню «Главная» в группе «Редактирование» нажмите на кнопку  «Заполнить» - «Прогрессия». Выберите расположение по строкам – Шаг 0,2 – Предельное значение 2 – ОК. В результате в строке появляется ряд значений аргумента х

5.     В ячейке B2 ввести формулу =КОРЕНЬ(B1)/(B1+1).

6.     Методом автозаполнения скопировать ее в ячейки C2:L2. Этот метод заключается в следующем: выделить ячейку B2, встать на маркер заполнения в правом нижнем углу ячейки, нажать левую клавишу мыши и протащить ее до ячейки L2. В результате в этих ячейках появится значение функции при соответствующих значениях х.

7.     В строке меню «Главная» в группе «Ячейка» нажмите на кнопку «Формат» - «Формат ячеек». Далее выберите вкладку «Граница» и оформите таблицу.

8.     Щелчком на первой ячейке выделите строку. В строке меню «Главная» в группе «Ячейка» нажмите на кнопку «Вставить» - «Вставить строки на лист».

9.     В новой строке сделать объединение ячеек, ввести заголовок.

Построение графика.

10.                       Выделить ячейки B3:L3.

11.                       В строке меню Вставка, в группе Диаграммы, нажмите на кнопку График, выберите тип График.

12.                       Выделите диаграмму, щелкнув на нее левой кнопкой мыши.

13.                       В появившемся окне Работа с диаграммами выберите Макет.

14.                       В группе Данные нажмите Выбрать данные, Подписи горизонтальной оси, Изменить, в Диапазоне подписей оси поставьте курсор, мышью в рабочем окне выделите ячейки В2:L2 (там , где находятся значения Х), ОК, ОК.

15.                       В группе Подписи нажмите на кнопку Название диаграммы.

16.                       Введите название График функции.

4,5(2 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ