Pascal вычислить дискриминант квадратного уравнения с процедуры или функции (procedure, function)
asyunyasavints
3
01.07.2019 09:20
0
Другие вопросы по теме Информатика
микс111111
08.08.2019 11:50
Jenyastai
08.08.2019 11:50
fjjjfg
08.08.2019 11:50
Mognolia
08.08.2019 11:50
Ясмина1604
08.08.2019 12:00
liedieuse
08.08.2019 12:00
T1mon4ikRYTP
08.08.2019 12:00
Nnas22
08.08.2019 12:00
Reginalolo
08.08.2019 12:00
Популярные вопросы
- Определите ,по какому признаку составлено множество чисел: г)d-(13,23,43,53,73,83)...
2 - Нельзя было победить антея в единоборстве, не зная тайны, откуда великан получал...
1 - 1.два поезда движутся навстречу друг другу со скоростями 72 и 54. длина первого...
1 - Подобрать по 5 примеров однозначных и многозначных и 5 слов в прямом и переносном...
1 - Составить текст из 6 предложений на тему мои летние каникулы...
3 - (второй вопрос вопрос) россии xx - начало xxi века почему п.а. столыпин был категорически...
1 - Запиши слова с этими суффиксами и корнями еньк,н,ов,ев,ив,лив жёлт,вечер,тёпл,мороз,хорош,берёз,груст,чист,сон,ёж,заяц,ключ,мышь,замок,зонт,храбр,обид,хитр,кот,медведь,шут,мал,счаст,зим,багаж,вод....
1 - Составьте модель : от чтсла а отняли 4, полученную разность разделили на 2 и получили...
1 - Выделить корень в слове подозрительности...
1 - Во сколько раз больше выделится тепла при остывании 10 кг чугуна на 1*с, чем при...
1
x,y,z:real;
function d(a,b,c:real):real;
begin
readln(a,b,c);
d:=sqr(b)-4*a*c;
end;
begin
writeln(d(x,y,z))
end.