1) var x, i: integer; begin write('введите x -> '); readln(x); write(1, ' '); for i: = 2 to x div 2 + 1 do if x mod i = 0 then write(i, ' '); write(x); end. 2) var x,count, i: integer; begin write('введите x -> '); readln(x); for i: = 2 to x div 2 + 1 do if x mod i = 0 then count: = count + 1; writeln(count); end. 3) var x, count, i: integer; begin write('введите x -> '); readln(x); for i: = 2 to x div 2 + 1 do if x mod i = 0 then count: = count + 1; if count = 0 then writeln('простое') else writeln('составное'); end. 4) var n,m, i, j: integer; fl: boolean; begin readln(n,m); for i: = n to m do begin fl : = true; for j: = 2 to i div 2 + 1 do if i mod j = 0 then fl : = false; if (fl) then write(i, ' '); end; end.
juliavovo
06.10.2021
системы программирования -это система для разработки новых программ на конкретном языке программирования . современные системы программирования обычно предоставляют пользователям мощные и удобные средства разработки программ. язык программи́рования — формальный язык , предназначенный для записи компьютерных программ . язык программирования определяет набор лексических , синтаксических и семантических правил, определяющих внешний вид программы и действия, которые выполнит исполнитель (обычно — эвм ) под её .