Вариант А

1) Опишите, что выполняет данная программа. Приведите пример на конкретных числах:

var a,b,s,j:integer;

begin

read(a,b);

s:=0;

for j:=a to b do

begin

s:=s+j;

end;

write(s);

end.

2) Напишите программу, которая выводит все четные числа до заданного пользователем числа.

1) Программа находит сумму всех чисел от a до b. Например для 3 и 5, она выведет 122)var    a, i:integer;begin    read(a);    for i := 1 to a do        if i mod 2 = 0 then            write(i, ' ');end.