1.
Если 24% засеяли, то осталось 100% - 24% = 76% = 45,6 га.
76% = 45,6 га
100% = х га
х = 45,6*100/76 = 60 (га) - площадь поля.
ответ: 60 га площадь всего поля.
2.
80% = 2,4т
100% = х т
х = 100*2,4/80 = 3 (т) - смололи пшеницы.
100% = 2,5т
80% = хт
х = 2,5*80/100 = 2 (т) - получится муки.
ответ: 3 т смололи пшеницы, чтоб получить 2,4 т муки; 2т муки получится из 2,5 т пшеницы.
3.
16% = 4 т
100% = х т
х = 4*100/16 = 25 (т) - надо свежих яблок.
4,5 т = 100%
х т = 16%
х = 4,5*16/100 = 0,72 (т) - получится сушеных яблок.
ответ: 25 т нужно взять свежих яблок, чтоб получить 4 т сушеных; 0,72 т сушеных яблок получится из 4,5 т свежих яблок.
4.
200 = 100%
16 = х %
х = 16*100/200 = 8% - составляют незрелые арбузы.
ответ: 8% всех арбузов составили незрелые арбузы.
b : array [,] of real;
i, k, m : integer;
begin while m < 4 do begin
write('Введите размер матрицы (>3): ');
readln(m);
end;
b := new real[m,m];
for i := 0 to m-1 do begin
for k:= 0 to m-1 do begin
read(b[i,k]);
end;
end;
writeln();
write('Cтрока 1: '); write(Chr(9)); writeln('Cтрока 4:');
for i:= 0 to m-1 do begin
writeln(b[0,i], Chr(9), Chr(9), b[3,i]);
end;
end.
матрицу желательно вводить построчно и с пробелом между элементами
писалось в PascalABC.NET