Найти сумму четных чисел в интервале от 10 до 100 паскаль

Question

Никита дубровин Ученик (95), закрыт 8 лет назад

Answer 1

uses crt;
var
i,s:integer;
BEGIN
i:=10;
while i<=100 do
begin
s:=s+i;
i:=i+2;
end;
write(s);
END.

Answer 2

var i,s:integer;
begin
for i:=10 to 100 do if (i mod 2=0) then inc(s,i);
writeln(s);
end.

Answer 3

Rustem Мастер (1200) 12 лет назад

qwertyui

Answer 4

В топку циклы, все гораздо проще:

a:=10;
b:=100;
writeln((b*(b+2)-a*(a-2))/4);

Удачи!

Answer 5

На PHP 7

<?php

$sum=0;

$i=10;

while($i<=40)

{$sum+=$i;
$i+=2;
}

echo "$sum";
?>