Зад) Вычисляет сумму чисел х и у; если х>y их разность если х<у; их произведения в случае, если они равны.
2 Зад) Вывести первые 25 натуральных чётных чисел.
Запишите схему по алгоритм

81920 бит : 8 = 10240 байт

10240 байт : 1024 = 10 килобайт

p = a + b + с т.е.сумма длин всех его сторон(из

1) 25, 36, 49, 64

2) 13, 9, 12, 8

3) 46, 47, 48, 56

4) 55, 62, 69, 76

5) 32, 24, 16, 8

6) 312, 313, 314, 412

7) 312, 322, 332, 412

var a: array[1..n] of integer;

i,n: integer;

begin

readln(n);

for i: =1 to n do readln(a[i]);

for i: =1 to n do 

if (i mod 2=0) then

for i: =1 to n do writeln(a[i]);

end.