Петя купил 6 дисков, причем сд дисков в 2 раза больше, чем дvd дисков. сколько петя купил cd и dvd дисков

2х + х = 6 3х = 6 х = 2 купил dvd 2 * 2 = 4 купил cd

Пусть х - dvd , тогда cd - 2х. всего 6 дисков. х + 2х = 6 3х = 6 х = 6: 3 х = 2 - это dvd 2 умножить на 2 = 4 - это cd ответ: он купил 2 dvd диска , и 4 сd диска.

Словесный: получим значения a, b и c, вычислим дискриминант по формуле d : = b * b - 4 * a * c, вычислим корни по формуле x : = (-1 * b + sqrt(d) )/ 2 * a блок-схема: (начало) /ввод a/ /ввод b/ /ввод c/ [d : = sqr(b) - 4 * a * c] [x : = (-1 * b + sqrt(b)) / 2 * a] /вывод x/ [x : = (-1 * b - sqrt(b)) / 2 * a] /вывод x/ (конец) надеюсь в блок-схеме разберешься какие скобки какую фигуру в этих алгоритмах я брал только случаи, когда d строго больше нуля. ты можешь дополнительно добавить ветвление после нахождения d и добавить все условия. я просто на этом окне никак это не сделаю. программа будет с ветвлением. программа: var a, b, c, d, x: real; begin write('введите a: '); read(a); write('введите b: '); read(b); write('введите c: '); read(c); d : = sqr(b) - 4 * a * c; if d > 0 then begin x : = (-1 * b + sqrt(d)) / 2 * a; writeln('x1 = ', x); x : = (-1 * b - sqrt(d)) / 2 * a; writeln('x2 = ', x); end else if d = 0 then begin x : = (-1 * b + sqrt(d)) / 2 * a; write('x = ', x); end else write('корней нет! '); end. (протестировано, работает! )

Program multiplymatrix2vector; // произведение матрицы на вектор. // r[m] = a[m,n]*b[n] const row = 2; col = 3; type matrix = array[1..row, 1..col] of byte; vect_mul = array[1..col] of byte; // вектор на который умножаем vect_res = array[1..row] of byte; // вектор с произведением var a: matrix : = ( (3, 7, 5), (1, 0, 4) ); //матрица b: vect_mul : = ( 1, 2, 3 ); // вектор на который умножаем r: vect_res; // вектор с произведением // m: количество рядов n: количество столбцов function mulmatvec(n,m: byte; var mx: matrix; var vr: vect_mul): vect_res; var i,j: byte; r: vect_res; begin for i: =1 to m do for j: =1 to n do r[i]: =r[i] + mx[i,j] * vr[j]; mulmatvec : = r; end; begin writeln('матрица: ', a); writeln('вектор: ', b); r : = mulmatvec(3, 2, a, b); writeln('произведение: ', r); end.