Напиши программу, которая будет выводить на экран 7 раз набор символов «@[email protected]» в столбик
2)Напиши программу для вычисления суммы ряда чисел: 1/2+1/4+…+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

Объяснение:

1)

var i:integer;

begin

for i:=1 to 7 do

writeln('@[email protected]');

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 выступает в роли числа количества итераций цикла.