18 б. . чому буде дорівнювати значення змінної s? vari, s: integer; begin s : = 0; for i: = 2 to 1 do begin s : = s + i; end; end; ( с объяснениями )

for i: = 2 to 1 do - с таким условием цикл не сработает не разу.
Поэтому s=0

У вас начало неправильное должно быть первой строкой program ; и не правильно'vari'вместо'var' цикл работать не будет так как не верный указан параметр