Сформировать последовательность, состоящую не менее - вопрос №1400994 от polinaaaaaaaaaiiii 30.09.2020 14:18

Question

Информатика: Сформировать последовательность, состоящую не менее чем из n цифр,такую, что каждое двухзначное число, записываемое двумя соседними цифрами(в том порядке, в каком они написаны), должно делиться на 19 или 23. последовательность должна начинаться на заданную цифру. это если что в паскале)и цикл должен быть вайл или репит)

polinaaaaaaaaaiiii · Answer

program 1qq; var c,b,n,a:integer; begin  readln(n); readn(a); b:=0; c:=a; while b n do begin b:=b+1; if a mod 19 = 0    and a mod 23 = 0 then writeln(a); a:=a+1; end; writeln( KONEC ); end.  ...