Евгений
?>

Составить программу на паскале: найти сумму cлучайных пяти элементов массива из интервала [-20, +20].

Информатика

Ответы

elena
// PascalABC.NET 3.2, сборка 1417 от 28.03.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var a:=ArrRandom(5,-20,20); a.Println;
  Writeln('S=',a.Sum)
end.

Пример
-3 6 -10 6 5
S=4
steger

ответ: Тема «Правила ввода текста», гостиница «Малахит», шоколад «Алёнка», роман «Война и мир».

Этапы создания текстового документа: ввод, редактирование, форматирование.

Информация во Всемирной паутине организована в виде страниц (Web-стран).

Объяснение: Тема «Правила ввода текста», гостиница «Малахит», шоколад «Алёнка», роман «Война и мир».

Этапы создания текстового документа: ввод, редактирование, форматирование.

Информация во Всемирной паутине организована в виде страниц (Web-страниц).

Всё-таки, Мамин-Сибиряк, жар-птица, северо-восток, Ростов-на-Дону, Нью-Йорк. Пришлось волей-неволей остаться здесь на ночь. Горя бояться — счастья не видать. Москва — огромный город, город-страна. Конец XVII века — первая половина XIX века.иц).

Всё-таки, Мамин-Сибиряк, жар-птица, северо-восток, Ростов-на-Дону, Нью-Йорк. Пришлось волей-неволей остаться здесь на ночь. Горя бояться — счастья не видать. Москва — огромный город, город-страна. Конец XVII века — первая половина XIX века.

тахирович_Игорь581

#include <iostream>

#include <cmath>

using namespace std;

int main()

{

setlocale(LC_CTYPE, "");

cout << "введите абс";

double a, b, c;

cin >> a >> b >> c;

if (a == 0) {

 cout << "a!=0";

 exit(1);

}

double D = powl(b, 2) - 4 * a * c;

if (D > 0) {

 cout << (b - sqrt(D)) / (-2 * a) << endl;

 cout << (b + sqrt(D)) / (-2 * a);

}

else if (D == 0) {

 cout << b / (-2 * a);

}

else {

 cout << "Корней нет";

}

return 0;

}

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

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

Составить программу на паскале: найти сумму cлучайных пяти элементов массива из интервала [-20, +20].
Ваше имя (никнейм)*
Email*
Комментарий*

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

voropayelena26
Anatolevich_Kulikov1229
druzjkinaas22
voloshin238
krylova-natali
zalev
Gennadevich Aleksandr
Surkova_Pavlovna
vadimpopov88
dushechkin2
Lorvi_Shevkunova849
membuksdk
Tsibrova
tboychenko
Екатерина