Question

СРОЧНО ПЛИЗ!
1)Напиши программу, которая будет выводить на экран 7 раз набор символов «@--@» в столбик
2)Напиши программу для вычисления суммы ряда чисел: 1/2+1/4+…+1

Answer 1

Ответ:

s = 0

k = 30

d = k - 5

k = 2 * d

s = k - 100

Ответ: -50

2. Укажите значение переменной x после выполнения следующего кода:

x = 3

y = 4

z = x + y

z = z + 1

x = y

y = 5

x = z + y + 7

Ответ: 20

3. Что появится на экране после выполнения следующей программы?

a = 4

print(a, 'a')

Ответ: 4 a

Answer 2

Ответ:

Объяснение:

1)

var i:integer;

begin

for i:=1 to 7 do

writeln('@--@');

end.

2)

var n,i,z:integer;

k:real;

begin

read(z);

n:=2;

for i:=1 to z do

begin

k:= k + (1 / n);

n:= n + 2;

end;

write(k);

end.

Во втором задании Z выступает в роли числа количества итераций цикла.