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

Даны два массива x(n) и y(n) . в каком из них больше ненулевых элементов? (на языке с++)

👇
Ответ:
Alpetrova7
Alpetrova7
12.02.2021
#include <iostream>
#include <cstdlib>#include <ctime>
using namespace std;

int main() {
srand(time(0));
const int n = 5;
int x[n], y[n], x0=0, y0=0;
for (int i = 0; i < n; ++i) {
x[i] = rand() % 5;
y[i] = rand() % 5;}
for (int i = 0; i < n; ++i) {
cout<< x[i]<<' ';}
cout << endl;
for (int i = 0; i < n; ++i) {cout << y[i] << ' ';}
for (int i = 0; i < n; ++i) {
if (x[i]) x0++;
if (y[i]) y0++;}
cout << endl;
if (x0 > y0) cout << 'x';
if (x0 < y0) cout << 'y';
if (x0 == y0) cout << '='; 
return 0;}
4,5(67 оценок)
Открыть все ответы
Ответ:
dasha34presnova
dasha34presnova
12.02.2021
С ЦИКЛАМИ:
Program test ;
Var
d, a, :real;
n, i:integer;
Begin
Write ('введите a1: ');
Readln(a) ;
Write(' введите шаг арифм. прогресии: ');
Readln(d);
Write('введите номер члена арифм. прогресии:');
Readln(n);
For i:=1 to n do a:=a+d;
Writeln(n, ' член арифметической прогресии равен : ', a);
End.
БЕЗ ЦИКЛОВ:
Program test ;
Var
d, a, :real;
n, i:integer;
Begin
Write ('введите a1: ');
Readln(a) ;
Write(' введите шаг арифм. прогресии: ');
Readln(d);
Write('введите номер члена арифметической прогресии: ');
Readln(n);
Writeln(' ответ: ', a+d*(n-1));
End.
4,8(81 оценок)
Ответ:
aytac200505
aytac200505
12.02.2021
Program znanija;
var A:array[1..20] of integer;   
i,k,min,n:integer;
begin
min:=1000000000; // прощу прощение за такое ) 

for i:=1 to 20 do  A[i]:=random(9); // заполняем массив 

for i:=1 to high(A) do  // находим минимальное нечётное, запоминаем его номер
if (A[i] < min) and (A[i] mod 2 <> 0) then begin
n:=i; min:=A[i];
end;  

for i:=1 to 20 do  write(A[i]:3);   // Выводит весь массив 

writeln();  // просто перевод на новую строку для красоты 

writeln('Minimum: ',min,' Ego nomer: ',n); // выдаём минимальное и его номер
end.
4,5(79 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ