1. Информатика
  2. Составьте программу дискриминанта

Составьте программу дискриминанта так, чтобы а,b,с -задавались генератором случайных чисел (random); +эта программа должна включать в себя массив ( в писать по возможности с объяснением)

твоёсолнце7 твоёсолнце7    2   18.05.2019 08:20    3

Ответы
СветаТихая СветаТихая  11.06.2020 14:37

Var koef:array[1..3] as integer; 

d:real;

i:integer;

Begin

Randomize;

;Генерируем коэффициенты a b c

for i:=1 to 3  do

begin

koef[i]:=random(100);

end;

;Считаем дискриминант 

d:=koef[2]*koef[2]-4*koef[1]*koef[3];

;выводим ответ

Writeln(d:5:2);

end.

 

 

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
админ1273 админ1273  18.05.2019 20:00
Перевести в десятичную систему: 10001,01 в двоичной системе. перевести в восьмиричную систему: 55 в десятичной системе вычислить: (110111 в двоичной системе+ 1011 в двоичной системе)...
Timewinter Timewinter  18.05.2019 20:00
Определите, какое из следующих утверждений ложное? а.чем вероятность меньше, тем больше информации б.информационный вес символа тем больше, чем чаще он встречается в тексте в. шум-это...
lizamalaya2012 lizamalaya2012  18.05.2019 20:00
Какие часы показывают точное время лишь два раза в сутки...
SuperFox9472 SuperFox9472  17.03.2019 22:30
Дано x, вычислить y, если y=(x^2)/4 при -2 =x =2 вот написал, правильно ли? if -2 = x and x = 2 then y : = x*x/4; заранее...
59494920948583 59494920948583  17.03.2019 22:20
Сообщение занимает 4 страницы по 30 строк. в каждой строке по 50 символов. все сообщение занимает 4500байт. какова мощность используемого алфавита.?...
avoka avoka  17.03.2019 22:20
По паскалю! 21. в компьютер вводятся два числа. если первое больше второго, то вычислить их сумму, иначе - произведение. после этого компьютер должен напечатать текст решена. 22....
tikmehr tikmehr  29.08.2019 05:20
Треугольник со сторонами a b c является равнобедренным составить программу true , если высказывание истинно, false не верно...
DanilGorev DanilGorev  03.02.2021 09:45
Как ограничить диапазон чисел в Python 3.8.6? Желательно прикрепить код для этого...
facss facss  12.05.2020 17:16
У МЕНЯ ВРЕМЕНИ 40 МИНУТ Кот Матроскин, Дядя Фёдор, почтальон Печкин и Шарик сели за круглый стол. Перед каждым из них стояла тарелка с 15 бутербродами. Каждую минуту трое съедали...
phannastarichenko phannastarichenko  12.05.2020 17:16
прием пищи) heißt … a) Mittagessen b) Abendessen c) Frühstück 4. Isst du nicht gerne Pommes frites? a) Вы любите есть картофель фри? b) Ты не любишь есть картофель фри? c) Ты не...

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