Напишите программу на языке Pascal, которая подсчитывает количество чисел кратных 8

Напишите программку на языке Pascal, которая подсчитывает количество чисел кратных 8 в интервале от n до 100

Задать свой вопрос
1 ответ
Var
  n,i,k:integer;
begin
  Write('n=');
  Readln(n);
  k:=0;
  for i:=n to 100 do
    if i mod 8 = 0 then Inc(k);
  Writeln('k=',k);
end.
Софья Саврукова
спасибо громадное
Нелли
что такое inc ? как он работает?
Ленька
спасибо громадное, можешь еще помочь, я там еще две задачи добавил!!!!
Люсина Яна
спасибо громадное
Gennadij Frejdenfeld
что такое inc ? как он работает?
Кристина Плисова
спасибо громадное, можешь еще посодействовать, я там еще две задачки добавил!!!!
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт