ульяна7346
24.03.2023 07:50

Вводится число n. выведите те числа от 1 до n, которые делятся на 13. примеры: 25- ввод 13- вывод 39-ввод 13 26 39-вывод pascal abc

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
жека0262
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.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота