gallows-warlike-0z
?>

Дан массив из 10 элементов. составить программу, находящую среднее арифметическое положительных.

Информатика

Ответы

Сухроб944
Program mass;
uses crt;
var massiv:array[1..10] of integer;
     i,count:integer;
     sra:real;
begin
for i:=0 to 10 do begin
   readln(massiv[i]);
   if massiv[i] > 0 then begin
     count:= count+1;
     sra:= sra + massiv[i];
  end;
end;
sra:= sra/count;
writeln('Среднее арифметическое = ',sra);
end.
zdv686857

#include <iostream>

using ll = long long;

using ld = long double;

#define yes cout << "YES" << "\n"

#define no cout << "NO" << "\n"

#define three cout << "Равносторонний"

#define two cout << "Равнобедренный"

#define one cout << "Разносторонний"

using namespace std;

bool exist(ll a, ll b, ll c){

   return (a + b > c) && (a + c > b) && (b + c > a);

}

void type(ll a, ll b, ll c){

   if(a == b && b == c)

       three;

   else if(a == b || b == c || a == c)

       two;

   else

       one;

}

signed main() {

   ll a,b,c;

   cin >> a >> b >> c;

   if(exist(a,b,c)){

       yes;

       type(a,b,c);

   } else

       no;

}

marketing6

print("Введите длины сторон предполагаемого треугольника:")

a = float(input("a = "))

b = float(input("b = "))

c = float(input("c = "))

if a + b > c and a + c > b and b + c > a:

print("Треугольник существует")

       if a == b and a == c and b == c:

                print("Треугольник равносторонний")

       else:

       if a == b or a == c or b == c

                print("Треугольник равнобедренный")

       else:

                 print("Треугольник разносторонний")

else:

print("Треугольник не существует")

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Дан массив из 10 элементов. составить программу, находящую среднее арифметическое положительных.
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

Peshkov
ИП-Сысоев1628
борисовна Елена78
vladburakoff5
lenapopovich556510
ovdei71
annino
snopovajulia
rkorneev19061
Наталья
Natalya1895
egamedicalbuh
yanva
LYuBOV
expozition