ПРОГРАММА И БЛОК СХЕМА. ПОМОГИТЕ СРОЧНО
10-11 класс
|
var
a, b, x, y: real;
i, m: integer;
begin
Write('Введите через пробел m,x,a: ');
REadln(m, x, a);
b := 1;
for i := 1 to m do
begin
b := b * 5 * x;
end;
if b > -10 then y := a - b
else y := x * x + 3 * b;
Writeln('y=', y:0:5)
end.
Другие вопросы из категории
Читайте также
2)Определить 35 простое число(программа +блок схемы)
3)Дано:трехзначное число ,определить :является ли произведение его цифр трехзначным числом(программа+блок схемы)
длинами своих сторон – a, b, c. Определить является ли
он тупоугольным, прямоугольным или остроугольным.
2) Построить циклический алгоритм, записать ввиде блок-схемы и на алгоритмическом языке.
Построить алгоритм, который определяет количество студентов в группе,
чей рост превышает среднее для группы значение.
Я не могу сочинить этот "алгоритм", помогите ;)
Блок-схемы строить не надо, просто описать, что надо делать.
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
n, массив P и радиусы r1, r2 /* Исходные данные */
вывести заголовок задачи и значения n, P, r1, r2 k ¬0 для i от 1 до n шаг 1 выполнять/*
Подсчитать число точек */ если r1 < ri и ri < r2 то k ¬k +1
конец-если
конец-цикл
вывести заголовки выходных данных и значений k конец
Теперь спланируем тестирование.
Проверку программы выполним при следующих исходных данных.
Зададим число точек на плоскости: n = 10. Подберем расстояния и радиусы: 0.03 21.0 12.89 7.41 99.99
P = 12.34 56.78 90.98 7.6 0.54
r1 = 12.35 r2 = 56.90.
Выходные данные в этой задаче будут иметь вид: Мишень Исходные данные:
n= 10 Массив P[n]: 0.03 21.0 12.89 7.41 99.99 12.34 56.78 90.98 7.6 0.54 r1 = 12.35 r2 = 56.90
Ответ: внутри 3 точки (три точки находятся внутри кольца).помогите написать программа в паскале и алгоритм блок-схему.пожалуйста срочно!