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

Дан массив из 25 чисел, найти среднее арифметическое элементов массива, сумму массива и кол-во чётных и не чётных элементов массива. элементы вводятся с гсч.

👇
Ответ:
саят17
саят17
05.06.2021
Var
  A: array[1..25] of integer;
  mean: real;
  qodds, qevens, i: byte;
  sum: integer;
begin
  sum := 0;
  qodds := 0;
  qevens := 0;
  randomize;
  for i := 1 to 25 do
  begin
    A[i] := random(41)-20;
    sum := sum + A[i];
    if (A[i] mod 2 = 0) then
      qevens := qevens + 1
    else
      qodds := qodds + 1;
    write(A[i], ' ');
  end;
  writeln(#13 + 'Среднее арифметическое = ', (sum / 25):0:2);
  writeln('Сумма = ', sum);
  writeln('Четных = ', qevens);
  writeln('Нечетных = ', qodds);
end.
4,4(97 оценок)
Ответ:
яидиот2345
яидиот2345
05.06.2021

program znanija;

uses CRT;

Var n,k,sum,ch,nch: integer;

sa: real;

M: Array[1..25] of integer;

begin

write('Ведите N: ');readln(n);

for k:=1 to 25 do

begin

M[k]:=random(n);

sum:=sum+M[k];

if (M[k] mod 2 = 0) then

begin

ch:=ch+1;

end else

begin

nch:=nch+1;

end;

end;

sa:=sum/25;

Writeln('Среднее арихметическое - ',sa);

Writeln('Сумма чисел - ', sum);

Writeln('Количество чётных - ', ch);

Writeln('Количество не чётных - ', nch);

writeln('--Числа--');

for k:=1 to 25 do

begin

Write(m[k],', ');

end

end.

4,8(27 оценок)
Открыть все ответы
Ответ:
Алиса2016
Алиса2016
05.06.2021

Using System;

namespace chislaabc

{

   class Program

   {

       static void Main(string[] args)

       {

           int a, b, c;

           

           Console.WriteLine(“Введите число a”);

           a = Convert.ToInt32(Console.ReadLine());

               Console.WriteLine(“Введите число b”);

           b = Convert.ToInt32(Console.ReadLine());

               Console.WriteLine(“Введите число c”);

           c = Convert.ToInt32(Console.ReadLine());

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

           {  

              Console.WriteLine(«Есть хотя бы одна противоположная пара»);  

           }

           else

           {

               Console.WriteLine(«Противоположных чисел нет»);

           }

           Console.ReadKey();

       }

   }

}

4,4(50 оценок)
Ответ:
Софалия
Софалия
05.06.2021

Кэша процессора является кэш - аппаратных средств , используемый центральным процессором (ЦП) от компьютера , чтобы уменьшить среднюю стоимость (время или энергию) , чтобы получить доступ к данным из основной памяти . Кэш - память является меньшей, более быстрой памятью, ближе к ядру процессора , в котором хранится копии данных из часто используемых основных ячеек памяти . Большинство процессоров имеют различные независимые кэши, в том числе инструкций и данных тайников , где кэш данных, как правило , организованы в виде иерархии более уровней кэш - памяти (L1, L2, L3, L4 и т.д.).

Объяснение:

4,8(95 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ