сервис вопросов и ответовДан одномерный массив из n элементов. Верно ли что для каждого элемента в этом массиве существует другой который равен ему по модулю. ( язык С)
10-11 класс|
|
Snowlady
22 окт. 2013 г., 18:56:43 (10 лет назад)
Alsu3375
22 окт. 2013 г., 20:13:13 (10 лет назад)
#include "stdafx.h"
#include <iostream>
using namespace System;
int main()
{
int m[]={1,2,3,1,2,3};
for(int i=0;i<sizeof m;i++)
{
bool found = 0;
for(int j=0;j<sizeof m;j++)
{
if(i==j) continue;
if(m[i]==abs(m[j])) {found=1;break;}
}
if(!found){Console::WriteLine(L"Неверно");return 0;}
}
Console::WriteLine(L"Верно");
return 0;
}
Ответить
Другие вопросы из категории
Помогите с информатикой(тема "Форум"):
1.Объясните разницу между списками рассылки, группами новостей и форумами?
Найти значение выражения:
1) 25/2= _________ 9) 220 div 10 mod 3 = ________
2) 25 div 2 = ______ 10) 220 mod 10 div 3 = ________
3) 25 mod 2 = ______ 11) -16 mod 11 * 3 = __________
4) 15+21 div 2= ____ 12) 3 div (5+3) = __________
5) 2 div 3 = _______ 13) 3 div 5 + 3 = _________
6) 2 mod 3 = _______ 14) (-19+9) div -5 = ________
7) 11 mod 5 = _____ 15) (16 mod 6) / (2 div 1) = ____
8) 14 mod (5 + 3) = ____ 16) 16 mod 6 / 2 div 1 __________
1. Из (8) 615044 в (16)
2.Из (16) FF410А в (8)
Если можно подробно,спасибо)
Читайте также
Паскаль помогите пжл!!!!!! Дан одномерный массив, состоящий из вещественных элементов. Найти произведение элементов массива,
расположенных между максимальным и минимальным элементами.
Дан одномерный массив, состоящий из вещественных элементов. Найти произведение элементов массива, расположенных между максимальным по модулю и минимальным по модулю элементами
ну или исправьте мое пжл
program fgf;
var mas:array[1..100] of real;
max,min:real;
i,n,c,b:shortint;
p:real;
f1,g:text;
begin;
assign (f1, 'input.txt');
reset (f1);
readln (f1, n);
for i:=1 to N do read (mas[i]);
max:=mas[i];
for i:=2 to N do begin
if mas[i]>max then begin
max:=mas[i];
c:=i;
end;
end;
min:=mas[1];
for i:=2 to N do begin
if mas[i]<min then begin
max:=mas[i];
b:=i;
end;
end;
close(f1);
assign (g, 'output.txt');
rewrite (g);
p:=1;
if b<c then I:=b+1 and c-1
else for I:=c+1 to b-1 do p:=p*mas[i];
if (n<3) or (b+1=c) or (c+1=b) then writeln(g,'0.00') else write(p:3:3) ;
close (g);
end.
1)дан одномерный массив из 5 элементов.найти сумму положительных элементов. 2)Дан одномерный массив из 7
элементов.Найти колличество четных положительных элементов.
3)Дан массив из 6 элементов.Найти произвдение положительных из них.
ПАСКАЛЬ.1)дан целочисленный массив из 30 элементов.элементы массива могут принимать целые значения от 0 до 1000.опишите на русском языке или на одном из
языков программирования алгоритм,позволяющий найти среднее арифметическое нечетных трехзначных чисел,записанных в этом массиве.если ни одного такого числа нет,нужно вывести сообщение об этом.
2)дан целочисленный массив из 30 элементов.элементы массива могут принимать целые значения от 0 до 100.опишите на русском языке или на одном из языков программирования алгоритм,позволяющий найти и вывести произведение элементов массива,которые имеют четное значение и не оканчиваются на 0.
4 задачи: ввести натуральное число и определить, верно ли, что сумма цифр равна 10 (через repeat и until)//// ввести натуральное
число и определить, какие цифры встречаются несколько раз (через repeat и until)///
ввести целое число и найти сумму его цифр (через while)
ввести целое число и определить , верно ли, что в его записи есть две одинаковые цифры(через while)
всё через паскаль абс
Дан одномерный массив из 1000 элементов, состоящий из случайных целых чисел в диапазоне от -5 до 8. Найти сумму элементов участка массива, начиная с
первого положительного и кончая вторым положительным элементом.
Вы находитесь на странице вопроса "Дан одномерный массив из n элементов. Верно ли что для каждого элемента в этом массиве существует другой который равен ему по модулю. ( язык С)", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.