Отыскать сумму 23 первых естественных чисел, которые при делении на 8

Найти сумму 23 первых натуральных чисел, которые при дроблении на 8 дают остаток 5. В паскаль

Задать свой вопрос
1 ответ
Var i,k,s:integer;
begin
k:=0;
i:=1;
while klt;gt;23 do
 begin;
  if i mod 8=5 then
   begin;
    s:=s+i;
    inc(k);
   end;
  inc(i);
 end;
writeln(s);
end.
Анна Драннинкова
Это неверное решение. Нужно отыскать сумму 23 чисел, удовлетворяющих условию, а не тех из 23, которые удовлетворяют.
Евгений Вашуто
Прошу помилованья, голова раскалывается. Сейчас поправлю.
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

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

Войти на сайт