Нужна . паскаль 1. створити двовимірний масив b(12; 15 заповнити масив послідовними цілими числами від 1, 2, . обчислити суму і кількість елементів масиву, що знаходяться під головною діагоналлю і на ній. вот то что смог сделать я program fiveone; var mass: array [1..12, 1..15] of integer; i, j: integer; begin for i: =1 to 12 do for j: =1 to 15 do mass[i, j] : =j; for i: =1 to 12 do begin for j: =1 to 15 do write(mass[i, j]: 4); writeln(); end; end.

const f0=1; fk=10; h=0.5;

var f:real; i:integer;

begin

f:=f0-h;

writeln('Фунты   Кг');

for i:=1 to round((fk-f0)/h)+1 do

begin

f:=f+h;

writeln(f:4:1,f*0.4:7:3);

end;

end.

2)

const f0=1; fk=10; h=0.5;

var f:real;

begin

f:=f0-h;

writeln('Фунты   Кг');

while f<fk do

begin

f:=f+h;

writeln(f:4:1,f*0.4:7:3);

end;

end.

3)

const f0=1; fk=10; h=0.5;

var f:real;

begin

f:=f0-h;

writeln('Фунты   Кг');

repeat

f:=f+h;

writeln(f:4:1,f*0.4:7:3);

until f>=fk;

end.

Результат:

Фунты   Кг

1.0  0.400

1.5  0.600

2.0  0.800

2.5  1.000

...

9.0  3.600

9.5  3.800

10.0  4.000

Объяснение:

информация – постоянный спутник человека люди всегда стремились облегчить свой труд с механизмов и машин. и такой машиной для работы с информацией стал компьютер.

человек и алгоритм в нашей повседневной жизни нас окружают алгоритмы, любой человек выполняет свои действия по порядку, раздумывая, правильно ли он поступает.

или         теоретическая часть: для многих существуют определенные правила (инструкции), объясняющие исполнителю, как решать данную . чем точнее и понятнее будут описаны правила решения , тем быстрее человек овладеет ими и будет эффективнее их применять.