СРОЧНО!ПОМОГИТЕ ПОЖАЛУЙСТА❤️ СПАСИБО❤️ 2 задание

Question

СРОЧНО!ПОМОГИТЕ ПОЖАЛУЙСТА❤️
СПАСИБО❤️
2 задание

---

Comments

А зачем условный оператор ? s:=0; i:=11; repeat s:=s+i; i:=i+2; until i>20; writeln('сумма = ',s);

Answer 1

Program x;
var a, i, b:integer;
Begin
a:=10;
b:=0;
for i:=1 to 10 do begin
if (a mod 2)=1 then b:=b+a;
a:=a+1;
end;
write(b);
End.