qq503

09.04.2022 11:18

Информатика

Есть ответ 👍

Цикл while. для n-чисел, < =100 найти произведение тех чисел которые кратны 3.

259

378

Посмотреть ответы 3

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

nastyaturchina

Информатика

4,4(24 оценок)

var a,n,s: integer;

begin

s: =1;

n: =1;

while n< =100 do begin

readln(a);

if a mod 3 =0 then s: =s*a;

n: =n+1;

end;

writeln(s);

end.

вроде так

если что не так, исправлю

nastya123litvin

Информатика

4,8(92 оценок)

#include < cstdlib> #include < iostream> using namespace std; //ни чего особо не значит, чисто //синтаксис,на алгоритм не влияетint main() {

int n=0;

int a=1;

while(n< =100)

{

if(n%3==0 & & n! =0)

{

a*=n; //a=a*n

}

n++; //n=n+1

}

cout< < "произведение равно "< < a< < endl; system("pause"); return 0; }

(код написан на с++.)

#include < cstdlib> #include < iostream> using namespace std; int main(){

int n=0;

int a=1;

while(n< =100)

{

if(n! =0) //если умножить на 0 то а в итоге будет равно

a*=n; //0 (0 делиться на 3)

n+=3; //n=n+3 (каждое третье делиться на 3, //увеличиваем сразу на 3)

}

cout< < "произведение равно "< < a< < endl; system("pause"); return 0; }

(код написан на с++.)

AzNas

Информатика

4,4(66 оценок)

Const maxelements = 1000; var arr : array[1..maxelements, 1..maxelements] of integer; counterarray : array[1..maxelements] of integer; i, j, n, m, countofpositive: integer; begin write('введите количество строк: '); readln(n); write('введите количество столбцов: '); readln(m); writeln('введите элементы массивы'); for i: =1 to n do for j: =1 to m do read(arr[i,j]); countofpositive : = 0; for j: =1 to m do begin for i: =1 to n do if arr[i,j] > 0 then inc(countofpositive); counterarray[j] : = countofpositive; countofpositive : = 0; end; writeln('количество положительных элементов в каждом столбце'); for j: =1 to m do write(counterarray[j], ' '); end.

Реши свою проблему, спроси otvet5GPT

Быстро
Мгновенный ответ на твой вопрос
Точно
Бот обладает знаниями во всех сферах
Бесплатно
Задай вопрос и получи ответ бесплатно

Задай свой вопрос

Популярно: Информатика

Есть вопросы?

Как otvet5GPT работает?

otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
Сколько это стоит?

Проект находиться на стадии тестирования и все услуги бесплатны.
Могу ли я использовать otvet5GPT в школе?

Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
В чем отличия от ChatGPT?

otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.