program a1; const n=20; var c: array [1..100] of integer; var i,k: integer; begink: =0; for i: =1 to n do beginc[i]: =random(101)-50; {заполнение массива произвольно от -50 до 50}write(' ',c[i]); {вывод массива на экран}end; for i: =2 to n doif c[i]< c[i-1] then k: =k+1; {сравнение элемента с предыдущим и счет элементов которые меньше}writeln; writeln('количество элементов=',k); end.
Ответ дал: Гость
program m; uses crt; var k,s: real; i: integer; beginclrscr; for i: =1 to 10 dobegink: =i/(i+1); s: =s+k; end; writeln(s: 2: 2); readkey; end.
Ответ дал: Гость
какой графический редактор? paint? кажется что подразумевается не 7 виндоуз, потому поэксперементировать трудно
не знаю какое 3 заполнение там подразумевается - у меня пастель (сама не знаю что это)
при удерживании шифта рисуются линии только с шагом 45 градусов, те только горизонтальные и вертикальные и диагональные
но по интуиции мне почемуто кажется что должно было получится солнышко
Популярные вопросы