Паскаль ! Найти сумму натуральный от 2 до 56 , кратных 5?

Question

Паскаль ! Найти сумму натуральный от 2 до 56 , кратных 5?

Comments

var a,b,c:integer;beginc:=56;for a:=2 to c dobeginif a mod 5=1 thenb:=b+a;end;writeln(b);end.

---

Ой ой ой где 5=1 измени 5=0

---

Скажите пожалуйста , а что такое br?

---

где br?

---

Вообщем чекай ниже, всё работает

Answer 1

Var
  a, b, c: integer;

begin
  c := 56;
  for a := 2 to c do
  begin    if a mod 5 = 0 then      b := b + a;  end;
  writeln(b);end.

Answer 2

Program five_sum;
var c, sum : integer
begin
c := 2;
sum := 0;
while c < 56 do begin
if c mod 5 = 0 then
sum := sum + c;
c := c + 1
end;
writeln( sum );
end.

Comments

Перед integer ; забыл

---

Да, есть такое :)