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

На паскале дан одномерный массив из 15 элементов.элементы массива положительные и отрицательные . найти количество положительных элементов , а отрицательные возвести в квадрат. вывести количество отрицательных элементов и новый массив.

👇
Ответ:
annasmaylick
annasmaylick
11.08.2021

//PascalABC.NET v3.3 1633

const n = 15;

var arr: array [1..15] of integer;

begin

for var i:=1 to n do

 arr[i]:=random(-5,5);

write('Исходный массив: ');

arr.PrintLn(', ');


var countP:=0;

var countN:=0;

for var i:=1 to n do

 if arr[i] > 0 then

   countP += 1

 else

 if arr[i] < 0 then

 begin

   arr[i]:=Sqr(arr[i]);

   countN += 1;

 end;

writeln('Количество положительных элементов: '+countP);

writeln('Количество отрицательных элементов: '+countN);

write('Новый массив: ');

arr.PrintLn(', ');

end.

4,8(85 оценок)
Открыть все ответы
Ответ:
KeeRuSha
KeeRuSha
11.08.2021

В город М напрямую можно попасть только из города Н (в который напрямую можно попасть только из города Ж), и из города Ж. Значит, для любого пути в Ж из А есть два варианта, как проехать в М.

В город Ж можно попасть напрямую из городов В, Г, и Д. В город В из города А можно попасть тремя путями: АБВ, АГВ и АБГВ, в город Г - двумя: АГ и АБГ, в город Е - тремя: АГЕ, АДЕ и АБГЕ.

Итого: Из города А в город Ж есть 3+2+3=8 путей, из Ж в М - 2 пути. Для каждого пути из А в Ж есть оба варианта пути из Ж в М, поэтому умножаем: 8×2=16 путей.

ответ: 16 путей

Буду очень благодарен, если Вы отметите мой ответ как лучший!

4,4(2 оценок)
Ответ:
12235110spl
12235110spl
11.08.2021

Примерно так

#include <iostream>

#include <chrono>

#include <ctime>    

int main()

{

   auto start = std::chrono::system_clock::now();

   auto end = std::chrono::system_clock::now();

   bool Cycle = true;

   double SredSum=0;

   std::time_t end_time;

   double Entered = 0, count = 0;

   setlocale(LC_ALL, "Russian");

   std::cout.precision(5);

   std::chrono::duration<double> elapsed_seconds = end - start;

   do {

       std::cin >> Entered;

       if (std::cin.fail()){

           Cycle = false;

           break;

       }

       end = std::chrono::system_clock::now();

       elapsed_seconds = end - start;

       

       SredSum = ((SredSum * count) + Entered) / (count + 1.0);

       count++;

       std::cout << "Среднее значение этих " << count << " чисел равно " << SredSum << std::endl;

       if (elapsed_seconds.count() > 60) { Cycle = false; }

   } while (Cycle);

}


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