Помогите, пожалуйста! Составите задачу в Pascal ABC и блок-схему: "Определить ср...

July 2022 1 10 Report

Помогите, пожалуйста!
Составите задачу в Pascal ABC и блок-схему: "Определить среди корней квадратного уравнения (вида ax^2+bx+c=0) наибольший и возвести его в квадрат. Приэтом необходимо найти сами корни уранения."
Заранее спасибочки:)

Answers & Comments

rus10011111 Vara, b, c, x, x1, x2, d, max: real;beginwrite('Введите a:');readln(a);write('Введите b:');readln(b);write('Введите c:');readln(c);d := b * b + 4 *a * c;if d > 0 then begin x1 := (-b + sqrt(d))/(2 * a); x2 := (-b - sqrt(d))/(2 * a); if x1 > x2 then max := x1 else max := x2; end else if d = 0 then max := -b /(2 * a);if ( d < 0) then writeln('Корней нет')else writeln(max * max); end.

0 votes Thanks 0

Answers & Comments

pomogite pozhalujsta dan ryad chisel 1 23 45 56 najti summu ryada nuzhno napi

napisat programmu v pascal abc kotoraya vypolnyaet perevorot 5 znachnogo chisla vv

napisat programmu v pascal abc kotoraya vypolnyaet perevorot pyatiznachnogo chisla9f7469fc0bc19ff86b83b71e19da8bba 77977

pascal abcv dvumernom massive opredelit est li elementy bolshe 7 esli est t

napisat programmu v pascal abc kotoraya vypolnyaet perevorot pyatiznachnogo chisla

napisat programmu v pascal abc kotoraya nahodit summu ryada 1 23 4 28 ispo

1010 ispolzuya cikl while3 napisat programmu kotoraya schitaet summu v pasca

napisat programmu v pascal abc kotoraya vyvodit 5 znachnoe chislo i vypolnyaet pere

pomogite pozhalujsta sostavite zadachu v pascal abc i blok shemu opredelit sr4388b66bc7ff3e30ee2cc8dca1754219 17680

sostavte i zapite formulu chislovogo ryada 1 23 45 56

рекомендуемые вопросы

Helpful Links

Helpful Social