deniskiselev1
10.03.2023 01:47

Решить 3 задачи в PascalABC.NET

Дано целое положительное число N. Вывести первые N чисел арифметический прогрессии 1, 3, 5, 7, …, используя цикл while или repeat.

Дано N положительных целых чисел. Сколько среди них двузначных?

Дано N целых чисел. Вывести только числа, которые делятся на 3 (в том же порядке).
Экзамен

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
amishka01
15.05.2022 06:42

Я использовал динамическое выделение памяти под массив, чтобы пользователь мог сам задать количество элементов в массиве.

Текст программы:

#include <locale>

#include <iostream>

#include <cstdlib>

using namespace std;

int main(int argc, char argv[]) {

setlocale(LC_ALL, "Russian");

int n, *a, i,  kol = 0;

double sum = 0;

cout << "Введите количество элементов в массиве"<<endl;

cin >> n;

a = new int[n];

cout << "Введите числа:" << endl;

for (i = 0; i < n; i++) {

 cin >> a[i];

 sum = sum + a[i];

 kol = kol + 1;

}

cout << "Ваш массив:" << endl;

for (i = 0; i < n; i++)

 cout << a[i]<<" ";

sum = sum / kol;

cout << "\n\nСреднее арифметическое: \n" << sum << endl;

cout << "\n\nЧисла, которые меньше среднего арифметического:"<<endl;

for (i = 0; i < n; i++) {

 if (sum > a[i])

  cout << a[i] <<endl;

}

return 0;

}

0,0(0 оценок)
Ответ:
х0мя
20.03.2023 04:23

Не очень уверен в правильности данного решения, потестил немного на разных вариантах - вроде работает. Но ощущение, что какой-то он корявый...

n = int(input('Введите количество учеников: '))

a = [list(map(int, input(f'Введите 1<=Xi и Yi<=100 через пробел для {i+1}-го ученика: ').split())) for i in range(n)]

print(a)

i = 0

summ = 0

while i <= len(a)-1:

   if i < len(a)-2:

       if a[i][1] < a[i+1][1]:

           summ += a[i][1]

           i += 2

       else:

           summ += a[i][0]

           i += 1

   elif i == len(a)-2:

       summ += a[i][1]

       i += 2

   else:

       summ += a[i][0]

       i += 1

print(summ)

0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота