tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Вводится число n. выведите
Вводится число n. выведите те числа от 1 до n, которые делятся на 13. примеры: 25- ввод 13- вывод 39-ввод 13 26 39-вывод pascal abc
ayzilyamannano
3 16.08.2019 14:50
0
Ответы
kViktoria2077
04.10.2020 23:01
Var
n,i:integer;
begin
readln(n);
i:=1;
while i<=n do begin
if i mod 13 =0 then write(i,' ');
i:=i+1;
end;
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
RomqaShut
10.02.2022 05:33
НАДО, У ВАС ЕСТЬ ДВА ЧАСА МАКСИМУМ, тут если что два скрина...
megadruzhinins
13.03.2020 13:52
1.Дано целое число(n) .Если оно является отрицательным(n 0) то прибавить к нему 2,в противном случае вычесть из него 1.Вывести полученное число2.Даны катет (a1) и катет (а2)...
Amina5155
19.05.2019 15:26
Объём аудиофайла 3,5 мбайта, разрядность звуковой платы 32 бита. с какой частотой дискретизации записан этот файл, если длительность его воспроизведения равна 15 секунд. ответ...
АзизОсманов
30.06.2019 23:10
Имеются сведения о 40-и регионах страны: название региона и информация об уровне безработицы в регионе. определите три наиболее благополучных и три неблагополучных района. нужно...
svetlanaka123
13.09.2019 16:00
Когда эти професли появились? чем занимаются люди этих профессий? к какой группе профессий они относятся? менеджер риэлтор дизайнер...
matwei123
13.09.2019 16:00
Преобразуйте в многочлен выражение четыре игрик минус одна четвертая икс все во второй степени...
sirozazuruhin
13.09.2019 16:00
Із 10 різних троянд та 6 різних жоржин потрібно скласти букет що містить 3 троянди та 2 жоржини. скільки різних букетів можна скласти?...
Rhhufyko
13.09.2019 16:00
Как во время правления екатерины ii изменилось положение дворян? как изменилось положение крестьян?...
mpaxomow
13.09.2019 16:00
ответить на вопрос! какие бывают семьи?...
КостяТрестьян
13.09.2019 16:00
При каком значении k векторы а(1/3; 3) и d(-4; k) а) коллинеарны б) перпендикулярны?...
Популярные вопросы
Разряд прилагательного серьезным...
2
твір на тему Бездуховнисть - прояв зла у жытти людыны , трагікомедія Сто...
3
Сделайте бизнес план надо по пунктам...
1
Дарю бесплатно просто напиши что то и полочиш их)...
2
Какой объем воздуха и какую массу воды надо взять для предотвращения сульфата...
2
напишите отзыв к 310 упражнению,основная часть,заключение и своё мнение....
1
Мпиевк6пи орамивкен14789999963333333333325...
2
Назовите САМЫЕ СЛОЖНЫЕ, НЕПОНЯТНЫЕ ДЛЯ РУССКОГО УХА ПРАВИЛА АНГЛИЙСКОГО ЯЗЫКА,...
1
Надо только 1 2 3 4 помагииие...
1
Как кыргызы завоевали столицу уйгуского каганата ордо балык...
3
n,i:integer;
begin
readln(n);
i:=1;
while i<=n do begin
if i mod 13 =0 then write(i,' ');
i:=i+1;
end;
end.