Нарисовать блок схему и написать программу Y=1+sqr(a+b)/(x-a) x пренадлежит [-1;1] дельта x =0,1
10-11 класс
|
Скачай программу блок схем. в ней создай ячейку ввод в ней укажи какие переменные ты вводишь, затем выбери цикл for в котором запиши Y=1+sqr(a+b)/(x-a). потом с лева под словом да нажав на кружочек добавь блок процесс и запиши в него x пренадлежит [-1;1], ну а под набписью нет тоже самое только вписать дельта x =0,1
Program esep;
const min = -1;
max = 1;
step = 0.1;
var a, b, x, y : real;
begin
x := min;
write('введите a, b, x: ');
readln(a, b, x);
repeat y := 1+sqr(a+ b)/(x-a);
writeln('X = ', x:6:2, ' Y(X) = ', y:6:2);
x := x + step
until x >= max + step;
readln
end.
Другие вопросы из категории
до 3 S:=0 нц для j от 2 до 3 S:=S+i+j кц кц
ПОМОГИТЕ
Найти произведение двух средних цифр четырехзначного числа.
Читайте также
PASCAL:
VAR
A:ARRAY[1...100]OFF
INTEGER;
N,I,J: INTEGER;
S: REAL;
BTGIN
N:=8;
FOR I:=1 TO N DO
BEGIN
S:=0;
FOR J:=1 TO I DO
S:=S+(A[J]);
S:=ABS(S);
WRITELN(`S`=`,S:9:2);
END;
READLN;
END.
QBASIC
DEFINT N,I,J,S,
DIM A(100) AS INTEGER
N:=8
FOR I=1 TO N
S=0
FOR J=1 TO I
S=S+A[J]
NEXT J
S=ABS(S)
PRINT S
NEXT I
ШКОЛЬНЫЙ АЯ
алг слово(рез вещ s)
цел раб А[1:100]
n:=8
нц для I от 1 до n
s=0
нц для j от 1 до I
s=s+a[j]
кц
s=abs(s)
вывод s
кц
кон
Пожааалуйста нужны блок-схемы для трех вариантов получения s
сумму членов последовательности, кратных 11. Составить блок-схему алгоритма, написать программу.
"Мужик и чёрт".
помогите, пожааалуйста!