Необходимо написать эту программу на бэйсике. дано натуральное число n. определить знакочередующуюся сумму всех цифр этого числа (младший разряд - положительный) p.s. натуральное число > 0, знакочередующаяся сумма - (для примера возьмём число 537) получается 5 + (-3) + 7

Const   n=10; var   a: array[1..n] of integer;   i, max,t: integer; begin   randomize;   writeln('исходный массив: ');   for i: =1 to n do   begin     a[i]: =random(40)-20;     writeln(a[i]);   end;   max: =-20-1;   for i: =1 to n do   if a[i]> max     then       max: =a[i];   t: =a[1];           //замена   a[1]: =max;   max: =t;   writeln('готовый массив: ');   for i: =1 to n do   writeln(a[i]); end.

Объяснение:

a := 30

b := 6

a := a * 3 / b

если a < b

то c := 2 * a – 5 * (b + 2)

иначе c := 2 * a + 5 * (b + 2)

все

2) a := 30

b := 18

a := 3 * b - a

если a > b

то с := 2 * a - b

иначе c := 2 * a + b

все

3) a := 56

b := 7

k := 6

a := a/7 - b

если a > b

то c := a - k*b

иначе c := a + k*b

все

4) алг

нач

цел s, t

ввод s

ввод t

если s > 8 и t > 8

то вывод "YES"

иначе вывод "NO"

все

кон

Было проведено 9 запусков программы, при которых в качестве значений переменных s и t вводились следующие пары чисел:

(9, 10); (11, 5); (–2, 8); (9, 9); (2, 8); (–1, 3); (–4, 5); (10, 9); (4, –3).

Сколько было запусков, при которых программа напечатала «YES»?

5) алг

нач

цел s, t

ввод s

ввод t

если s > 4 и t > 4

то вывод "YES"

иначе вывод "NO"

все

кон

Было проведено 9 запусков программы, при которых в качестве значений переменных s и t вводились следующие пары чисел:

(10, 6); (7, 6); (–4, 3); (2, 9); (12, 7); (–11, 4); (–8, 13); (10, 9); (6, 5).

Сколько было запусков, при которых программа напечатала «NO»?

6) алг

нач

цел s, t

ввод s

ввод t

если s > 6 и t < 7

то вывод "YES"

иначе вывод "NO"

все

кон

Было проведено 9 запусков программы, при которых в качестве значений переменных s и t вводились следующие пары чисел:

(7, 3); (2, 7); (6, 10); (5, 3); (5, 4); (–11, 4); (–8, 9); (7, 3); (9, 1).

Сколько было запусков, при которых программа напечатала «YES»?

7) алг

нач

цел s, t

ввод s

ввод t

если s > 2 и t < 5

то вывод "YES"

иначе вывод "NO"

все

кон

Было проведено 9 запусков программы, при которых в качестве значений переменных s и t вводились следующие пары чисел:

(–2, 3); (2, 5); (0, 3); (5, –3); (5, 4); (11, 4); (8, –6); (7, 3); (9, 1).

Сколько было запусков, при которых программа напечатала «YES»?