Вводится число n. выведите те числа от 1 до n, - вопрос №1132516717301 от КристинаМельникова 30.12.2021 09:17

Question

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

КристинаМельникова · Answer

Varn,i:integer;beginreadln(n);i:=1;while i =n do beginif i mod 13 =0 then write(i, );i:=i+1;end;end....