Решите пожалуйста на языке С, не в С++, а именно С. Буду очень благодарен
10-11 класс
|
#include <stdio.h>
#include <stdlib.h>
int N, c1, c2, sum, mult=1;
int* A;
int main()
{
scanf("%d",&N);
A = (int*) malloc(N*sizeof(int));
int i;
for(i=0; i<N; i++)
{
scanf("%d",&A[i]);
if (A[i]>0)
{
c1++;
sum+=A[i];
}
else if (A[i]<0)
{
c2++;
mult*=A[i];
}
}
printf("%d %d %d %d",c1,sum,c2,mult);
return 0;
}
Если что - не указано максимальное значение N, поэтому сделал динамический массив. c1,sum,c2,mult - кол-во положительных элементов, их сумма, кол-во отрицательных элементов, их сумма соответственно.
#include <stdio.h>
#include <stdlib.h>
main()
{
int i,n, n1=0, n2=0, sum=0, prod=1;
printf("n="); scanf("%d",&n);
int a[n];
for(i=0; i<n; i++){
printf("a[%d]=",i);
scanf("%d",&a[i]);
if (a[i]>0) {n1++; sum+=a[i];}
else if (a[i]<0){n2++; prod*=a[i];}
}
printf("n1=%d, sum=%d, n2=%d, prod=%d",n1,sum,n2,prod);
}
Тестовое решение:
n=5
a[0]=-2
a[1]=3
a[2]=-3
a[3]=2
a[4]=1
n1=3, sum=6, n2=2, prod=6
Другие вопросы из категории
б)102байт в)2 в 10 степени байт г)1000 бит
распечатать.срочно надо помогите пожалуйста
сообщение?
2. Сообщение занимает 2 страницы и содержит 1116 Кбайты информации. На каждой странице записано 256 символов.
Какова мощность используемого алфавита?
3. Сколько килобайтов составляет сообщение, содержащее 12288 битов?
Читайте также
Решите пожалуйста на языке Pacal
углов.
2)
Напишите пожалуйста программу (на языке BASIC) для определения подобия:
а) двух прямоугольников по двум смежным сторонам;
б) двух треугольников по трем сторонам.
б)y=x^15
Постараться использовать минимальное количество дополнительных переменных.
4. Запишите на языке Паскаль программу циклического обмена значениями трёх переменных a,b,c. Схема циклического обмена: a ← b ← c. Например, если до обмена было: a=1, b=2, c=3, то после обмена должно стать: a=2, b=3, c=1.
частное. Напишите на языках Pascal и C++ программу, моделирующую выбор одной из костей домино ( в наборе 28 костей домино, каждая состоит из двух половин, на каждой половине – от 0 до 6 очков). С помощью этой программы ответьте на вопрос: какова вероятность того, что выпадет кость с числом очков, кратным 3
На обычном
На инженерном
Паскаль не надо