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

У3-х значного числа определить позицию чётные цифр. через !

👇
Ответ:
Рома151999
Рома151999
15.04.2021
Var n: integer;
begin
write('Число = ');
readln(n);
write('Позиции четных цифр: ');
if not Odd(n div 100) then write(' 1 ');
if not Odd(n div 10 mod 10) then write(' 2 ');
if not Odd(n mod 10) then write(' 3 ');
end.

Пример:
Число = 834
Позиции четных цифр:  1  3
4,4(29 оценок)
Открыть все ответы
Ответ:
gjgfhbj5
gjgfhbj5
15.04.2021

а) 2

б) 2

в) 3

г) 1

Объяснение:

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

1. ПОЛ="М" И СУММА>55. В этой программе у нас есть два условия и один оператор "И". Он подчеркнут. Это обозначает, что результат программы будет актуален, если выполняется и то, и другое условие. Это значит, что выполняя данные требования, мы будем искать учеников, у которых будет и мужской пол, и СУММА больше 55.  

Ищем... По первому условию, ученик должен быть мужского пола. Этому требованию соответствуют Жариков, Костин и Кузнецов. Теперь пропускаем этих троих через второе сито - они должны заработать в сумме больше Из них это условие выполняют только Жариков и Кузнецов.

ответ: 2 ученика

2. (ЗАДАЧА1<ЗАДАЧА2) И (ЗАДАЧА2<ЗАДАЧА3). И снова у нас два условия и оператор И. Повторюсь, это значит, что ученик соответствует программе, когда выполняется и первое, и второе требование, то есть, когда у него по первой задаче меньше , чем по второй, и когда по второй меньше, чем по третьей.

Итак, ищем... Первому условию соответствуют сразу 3 ученика - Жариков, Кузнецов и Старовойтова. У них по по первому заданию меньше , чем по второму. Теперь подключаем второе сито - у кого из них по второй задаче меньше , чем по третьей. ответ: у Жарикова (20/25) и у Кузнецова (25/30). Только они выполняют оба условия.

ответ: 2 ученика

3. ЗАДАЧА1=30 ИЛИ ЗАДАЧА2=30 ИЛИ ЗАДАЧА3=30. На этот раз у нас три условия и два оператора. Оба ИЛИ (выделены подчеркиванием). Этот оператор обозначает, что результат корректен только тогда, когда выполняется хотя бы одно из условий. В нашем случае ученики удовлетворяют требования, если хотя бы по одной из задач у них есть

Ищем... хотя бы по одной из задач есть у трех учеников - Кузнецова (в третьей), Сизовой (во всех) и Школиной (в первой). Только они удовлетворяют данное требование.

ответ: 3 ученика.

4. ЗАДАЧА1=30 И ЗАДАЧА2=30 И ЗАДАЧА3=30. Это требование похоже на предыдущее, но есть одно НО - вместо "ИЛИ" теперь стоят "И". Это значит, что ученик удовлятворяет требованиям, только если выполняет все условия, то есть только тогда, когда у него по каждой  задаче

Как мы уже знаем из задачи, это условие выполняет только Сизова.

ответ: 1 ученик.

Итак, все задачи решены, результат:

ответ: а) 2; б) 2; в) 3; г) 1

4,6(80 оценок)
Ответ:
karuna4
karuna4
15.04.2021
//Pascal ABC.NET v3.1 сборка 1172

var
  ar: array of integer;
  n, k2, k3, k4, k5, i: integer;
  r: real;

begin
  write('Сколько учеников?');
  readln(n);
  setlength(ar, n);
  writeln('Введите оценки:');
  for i := 0 to n - 1 do
  begin
    readln(ar[i]);
    case ar[i] of
      2: inc(k2);
      3: inc(k3);
      4: inc(k4);
      5: inc(k5);
    else
      writeln('Не оценка');
      exit;
    end;
  end;
  writeln('2:', k2);
  writeln('3:', k3);
  writeln('4:', k4);
  writeln('5:', k5);
  write('Успеваемость=', (k3 + k4 + k5) / n * 100:0:1);
end.

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