ИНФОРМАТИКА. 9-ЫЙ КЛАССНайти сумму кратных 7-ми чисел,в промежутке от 150 до

ИНФОРМАТИКА. 9-ЫЙ КЛАСС
Найти сумму кратных 7-ми чисел,в интервале от 150 до 200. Составить программу.

Задать свой вопрос
1 ответ
Var sum: integer;
begin
sum:= 0;
for var i:= 150 to 200 do
  if (i mod 7) = 0 then
    sum:=sum+i;
  write(sum);
end.

--------------------
абс паскаль
Жугастр-Лушина Евгения
Немножко не то,что необходимо. Мы пользуемся на уроке программой "Кумир"...
, оставишь ответ?
Имя:*
E-Mail:


Последние вопросы

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

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

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

Войти на сайт