Отношение четных чисел к кратным 5 из промежутка -n до n напишите программу!

Program f1;
var i,n,t,y: integer;
s;real;
begin
read(n);
for i:=-n to n do begin
 if  i mod 2=0  then y:=i;
if i mod 5 =0 then t:=i ;
s:=y/t;
writeln(s);
end.

При логическом "и" значение истинно, если оба элемента являются истиной. Все остальное - ложь. Соответственно, чтобы высказывание "А и (Париж - столица Франции)" было истинным, нужно, чтобы оба элемента возвращали истину (логическая единица). Париж - столица Франции - истинно. А - истинно, т.е. А = 1. Для того, чтобы высказывание возвращало ложь, нужен хотя бы один логический ноль. Поскольку "Париж - столица Франции" - это 1, то B = 0.
При логическом "или" значение истинно, если присутствует хотя бы одна единица. Значит C = 1, D = 0

При логическом "и" значение истинно, если оба элемента являются истиной. Все остальное - ложь. Соответственно, чтобы высказывание "А и (Париж - столица Франции)" было истинным, нужно, чтобы оба элемента возвращали истину (логическая единица). Париж - столица Франции - истинно. А - истинно, т.е. А = 1. Для того, чтобы высказывание возвращало ложь, нужен хотя бы один логический ноль. Поскольку "Париж - столица Франции" - это 1, то B = 0.
При логическом "или" значение истинно, если присутствует хотя бы одна единица. Значит C = 1, D = 0