Ответы на вопрос:
Var k,m,n: longint; begin write('m n ? '); readln(m,n); for k: =(m-1) div 7 + 1 to n div 7 do write(k*7: 8); readln end.
Популярно: Информатика
-
положу Сент на телефон Лекции по истории науки С. Г. Смирнов Москва Издательство...
kghjg15.09.2021 10:11 -
Как в паскале сделать так чтоб на экран выводилось значение переменной...
nafani110.10.2022 02:45 -
От чего зависит качество изображения? от разрешения от глубины цвета от палитры...
evasyperandreev19.05.2020 14:54 -
Возможно ли создать частицы на любом объекте...
каринка190614.01.2020 07:18 -
Написать программу вычисления объема параллелепипеда. Вычисление объема Введите...
9865324028.12.2021 02:18 -
Какие пять режимов работы моторов доступны с программного блока управления...
nastakianka25.09.2020 00:06 -
Составить программу для решения задачи. Дано 2 целых числа. Если первое число...
matv18.10.2022 19:28 -
1. Прочитай речення. Перебудуй їх у спонукальні речення та запиши їх у зошит....
Sonya121s19.12.2020 23:10 -
5. Choose the explanation of the phrase Energy-dense foods” according to the...
valeria23242526.03.2020 05:24 -
Придумать 2 загадки про доверие. Понятным языком для детей младших классов....
Sashok125253520.05.2021 13:01