Вопрос задан 24.06.2023 в 04:29. Предмет Информатика. Спрашивает Трубчик Настя.

Умоляю помогите мне, я вообще не понимаю информатику, прошу помогите мне дам 45 баллов, задания

внизу: 1. С клавиатуры вводится 10 целых чисел, найти количество чисел, больших 4, но меньших 9. 2. С клавиатуры вводится n чисел, найти сумму чисел, больших 4, но меньших 9. 3. С клавиатуры вводится n целых чисел. Вывести все числа, которые делятся на 3 и нечетные, их количество и произведение.
0 0
Перейти к ответам

Ответы на вопрос

Внимание! Ответы на вопросы дают живые люди. Они могут содержать ошибочную информацию, заблуждения, а также ответы могут быть сгенерированы нейросетями. Будьте внимательны. Если вы уверены, что ответ неверный, нажмите кнопку "Пожаловаться" под ответом.
Отвечает Бочарникова Ульяна.

1.

var num, count, i:integer;

begin

count:=0;

for i:=1 to 10 do

begin

readln(num);

if (num >4) and (num<9) then

count:=count+1;

end;

write(count);

end.

2.

var sum, i, num:integer;

action:string;

begin

action:='еще' ;

sum:=0;

write( 'Чтобы перестать вводить числа, напишите [хватит], чтобы продолжать вводить, напишите [еще]') ;

while action = 'еще' do

begin

writeln('Введите команду') ;

readln(action);

Writeln('Введите число') ;

readln(num);

if (num>4) and (num<9) then

sum:=sum+num;

end;

write(sum);

end.

3.

var mult, count, i, num:integer;

action:string;

begin

action:='еще' ;

mult:=1; count:=0;

write( 'Чтобы перестать вводить числа, напишите [хватит], чтобы продолжать вводить, напишите [еще]') ;

while action = 'еще' do

begin

writeln('Введите команду');

readln(action);

writeln('Введите число') ;

readln(num);

if (num mod 2 <> 0) and (num mod 3 = 0) then

mult:=mult*num;

count:=count+1;

end;

write(mult, ' ', count);

end.

0 0
Отвечает нейросеть ChatGpt. Будьте внимательны, ответы нейросети могут содержать ошибочные или выдуманные данные.

Конечно, я помогу вам с этими заданиями. Давайте начнем с каждого из них по очереди:

  1. Найти количество чисел, больших 4, но меньших 9, среди 10 введенных чисел:

    python
    count = 0 # Инициализируем счетчик for i in range(10): # Цикл для ввода 10 чисел num = int(input("Введите целое число: ")) if 4 < num < 9: count += 1 print("Количество чисел, больших 4 и меньших 9:", count)
  2. Найти сумму чисел, больших 4, но меньших 9, среди n введенных чисел:

    python
    n = int(input("Введите количество чисел: ")) # Ввод количества чисел total = 0 # Инициализируем переменную для суммы for i in range(n): # Цикл для ввода n чисел num = int(input("Введите целое число: ")) if 4 < num < 9: total += num print("Сумма чисел, больших 4 и меньших 9:", total)
  3. Вывести все числа, которые делятся на 3 и являются нечетными, а также подсчитать их количество и произведение:

    python
    n = int(input("Введите количество чисел: ")) # Ввод количества чисел odd_divisible_by_3 = [] # Создаем список для хранения чисел product = 1 # Инициализируем переменную для произведения for i in range(n): # Цикл для ввода n чисел num = int(input("Введите целое число: ")) if num % 3 == 0 and num % 2 != 0: # Проверка на делимость на 3 и нечетность odd_divisible_by_3.append(num) # Добавляем число в список product *= num # Умножаем на число для произведения print("Числа, которые делятся на 3 и нечетные:", odd_divisible_by_3) print("Количество таких чисел:", len(odd_divisible_by_3)) print("Их произведение:", product)

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

0 0

Похожие вопросы

Топ вопросов за вчера в категории Информатика

Последние заданные вопросы в категории Информатика

Задать вопрос