посреди чисел от 100 до 1000 найти сумму тех чисел которые

Посреди чисел от 100 до 1000 отыскать сумму тех чисел которые кончаются на цифру 4

Задать свой вопрос
1 ответ
Var
    i, s: integer;

begin
    s := 0;
    for i := 100 to 1000 do
        if i mod 10 = 4 then
            s := s + i;
    writeln(s);
end.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт