Паскаль.двухмерный массив. в массиве b [1..10,1..3] содержатся данные о количестве сотрудников учреждения.элементы первой строки обозначают номер отдела, элементы второй строки количество мужчин в нем,элементы третьей строки количество женщин в отделе.сколько всего сотрудников в учреждении и кого больше: мужчин или женщин?

260

492

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

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

kasper121314

Информатика

4,4(29 оценок)

Var b: array[1..10,1..3] of integer; i,j,k,s,gi,bo: integer; begin writeln('исходный массив: '); for i: =1 to 10 do for j: =2 to 3 do b[i,j]: =random(30); k: =1; for i: =1 to 10 do begin for j: =1 to 3 do b[i,1]: =k; inc(k); end; for i: =1 to 10 do begin for j: =1 to 3 do write(b[i,j]: 5); writeln; end; for i: =1 to 10 do for j: =2 to 3 do s: =s+b[i,j]; write(' всего сотрудников в учреждении: ',s); for i: =1 to 10 do gi: =gi+b[i,2]; write(' женщин в учреждении: ',gi); for i: =1 to 10 do bo: =bo+b[i,3]; write(' мужчин в учреждении: ',bo); if (gi> bo) then write(' женщин больше') else write(' мужчин больше'); if (gi=bo) then write(' женщин и мужчин одинаковое количество'); end.

машана1

Информатика

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

#include< iostream> using namespace std; int main() { int a,b,c; cout < < "введите три числа: ", cin > > a > > b > > c; a = (a> b? b: a); a = (a> c? c: a); cout < < "min = "< < a < < "\n"; system("pause"); return 0; } #include< iostream> using namespace std; int main() { int a; cout < < "ââåäèòå òð¸õçíà÷íîå ÷èñëî: ", cin > > a; cout < < (a / 100 == a % 10? "ñîâïàäàþò": "íå ñîâïàäàþò")< < "\n"; system("pause"); return 0; }