Question

СРОЧНО!! ПОМОГИТЕ, ПОЖАЛУЙСТА! ИНФОРМАТИКА! ДАЮ МНОГО БАЛЛОВ!!! Среди N целых чисел определить кол-во четных и некратных трем.ЯЗЫК: C++ЗАРАНЕЕ ГОРОМНОЕ СПАСИБО!!!​

Answer 1

BEGIN

writeln('Введите а');

writeln('Введите а');readln(a);

writeln('Введите а');readln(a);i := 0;

writeln('Введите а');readln(a);i := 0;k := 1;

writeln('Введите а');readln(a);i := 0;k := 1;while (a<>0) and (k < 1000) do

writeln('Введите а');readln(a);i := 0;k := 1;while (a<>0) and (k < 1000) dobegin

writeln('Введите а');readln(a);i := 0;k := 1;while (a<>0) and (k < 1000) dobeginif (a mod 3 = 0) and (abs(a) <= 30000) then i := i + 1;

writeln('Введите а');readln(a);i := 0;k := 1;while (a<>0) and (k < 1000) dobeginif (a mod 3 = 0) and (abs(a) <= 30000) then i := i + 1;k := k + 1;

writeln('Введите а');readln(a);i := 0;k := 1;while (a<>0) and (k < 1000) dobeginif (a mod 3 = 0) and (abs(a) <= 30000) then i := i + 1;k := k + 1;readln(a);

writeln('Введите а');readln(a);i := 0;k := 1;while (a<>0) and (k < 1000) dobeginif (a mod 3 = 0) and (abs(a) <= 30000) then i := i + 1;k := k + 1;readln(a);end;

writeln('Введите а');readln(a);i := 0;k := 1;while (a<>0) and (k < 1000) dobeginif (a mod 3 = 0) and (abs(a) <= 30000) then i := i + 1;k := k + 1;readln(a);end;writeln(i, '- количество четных чисел, кратных трём.');

END.

Answer 2

Конечно, я могу помочь вам с задачей на языке C++. Вот пример кода, который решает вашу задачу:

cppCopy code
#include <iostream>

int main() {
    int N;
    std::cout << "Введите количество чисел N: ";
    std::cin >> N;

    int evenNonMultipleOfThreeCount = 0;

    for (int i = 0; i < N; i++) {
        int number;
        std::cout << "Введите число #" << i + 1 << ": ";
        std::cin >> number;

        if (number % 2 == 0 && number % 3 != 0) {
            evenNonMultipleOfThreeCount++;
        }
    }

    std::cout << "Количество четных и некратных трем чисел: " << evenNonMultipleOfThreeCount << std::endl;

    return 0;
}

В этом коде мы считываем количество чисел N с помощью std::cin, а затем в цикле for запрашиваем каждое число от пользователя. Если число является четным и не кратным трём, мы увеличиваем счетчик evenNonMultipleOfThreeCount. В конце программы выводится количество таких чисел.

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