Используя сначала цикл с условием, а затем - цикл с переменной, напишите программу, которая выводит на экран четные степени числа 2 от до в порядке убывания

243

377

Посмотреть ответы 2

Ответы на вопрос:

prudniksveta

Информатика

4,6(85 оценок)

Четные степени числа 2 - это все равно что целые степени числа 4 от до . программы на pascal: program first; var i: integer; begin i: =1024; while i> 1 do begin writeln(i); i: =i div 4; end; end. program second; var i,pow: integer; begin i: =1024; for pow: =5 downto 1 do begin writeln(i); i: =i div 4; end; end.

Den4ikBLeT

Информатика

4,7(21 оценок)

Const nx = 20; var x: array[1..nx, 1..nx] of real; i, j, k,n,r,t: integer; begin writeln('введите размер матрицы n'); read(n); randomize; writeln('исходный массив'); for i : = 1 to n do begin for j : = 1 to n do begin x[i, j] : = random(25)-10; write(x[i, j]: 4); end; writeln; end; writeln; writeln('измененный массив'); for i : = 1 to n do begin for j : = 1 to n do begin x[i, j]: = x[i, j] *(-1); write(x[i, j]: 4); end; writeln; end; end.