Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
djjegsdhssbsv
04.03.2022 07:28 •
Информатика
Подсчитать сумму чисел кратных 7 в промежутке от 200 до300.
Показать ответ
Ответ:
AlinaGazizullina2008
22.06.2020 05:43
Program Alina;
uses crt;
const
a=200;
b=300;
var i, n, k: integer;
begin
k:=0;
for i:=a to b do
if i mod 7 = 0 then k:=k+1;
writeln('Всего ',k,' чисел, кратных 7');
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
police5
04.11.2022 15:28
В алгоритмах, записанных ниже, используются переменные a и b, а также следующие операции: := - присваивание; + - сложение; -- - вычитание; * - умножение; / - деление. Определите...
Stupidpeoplenamber1
21.04.2020 00:51
3. Складіть проєкт для малювання квадратів, розміщених поруч, поки периметр квадрата не перевищує 50 кроків. Довжина сторони першого з них дорівнює акроків, а довжина сторони кожного...
Andreytsoy1
26.06.2022 22:00
Запишите следующие формулы на языке программирования : a+b:c= a:(a+c)= ax2+bx+c= a2+b2= (a-b):(c+d)= (2 это в квадрате)...
beauty227
20.02.2020 13:19
пайтон В одному із середовищ створити програму яка обчислює повних днів потрібно автомобілю, щоб проїхати маршрут протяжністю S кілометрів зі швидкістю N кілометрів за день?...
bondaryulia2000
01.04.2022 15:19
Вова решил зашифровать слово ИНФОРМАТИКА. Сначала он переставил первые 5 букв в конец слова, затем поменял местами первую и вторую буквы, а потом буквы К и Р....
moskaliov
06.08.2020 15:47
ОЧЕНЬ !! РЕШИТЕ Из списка выберите те положения, которые относятся к дискретности памяти: Выберите один или несколько ответов: 1.Внутренняя память состоит из частиц – битов 2.В...
ioiaaea33
07.09.2021 11:16
Як називається сукупність рядків і символів, яка закінчується натисканням клавіші Enter?...
кузя177
10.08.2021 20:33
с условным форматированием при ....
ЛимАнель
24.01.2023 15:51
Даны вещественные числа x и y. Определить, принадлежит ли точка с координатами(x;y) заштрихованной области. программа Python...
vovaq6oziu5d
06.06.2021 13:22
Определи формулу, которая используется в ячейке B4...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
uses crt;
const
a=200;
b=300;
var i, n, k: integer;
begin
k:=0;
for i:=a to b do
if i mod 7 = 0 then k:=k+1;
writeln('Всего ',k,' чисел, кратных 7');
end.