В Algo(Паскалі) написати програму, яка буде заповнювати таблицю членами геометричної прогресії , а потім знаходити суму всіх членів. Для піднесення до степеня написати процедуру. Кількість членів прогресії, перший член та знаменник повинні вводитись с клавіатури. В результаті роботи програма друкує члени прогресії у форматі b[1]=..., b[2]=...і т.д, і окремо друкує суму S = ... За ответ .
var a:array[1..4, 1..5] of integer;
i,j,k:integer;
begin
writeln('Заполните матрицу');
for i:=1 to 4 do
for j:=1 to 5 do begin
read(a[i,j]);
if (a[i,j] mod 3=0) and (a[i,j]>20) then k:=k+a[i,j];
end;
writeln('Сумма элементов кратных 3-м и > 20 = ',k);
end.
Задача №2
var a:array[1..5, 1..5] of integer;
i,j,k:integer;
begin
writeln('Заполните матрицу');
for i:=1 to 5 do
for j:=1 to 5 do begin
read(a[i,j]);
if i=j then k:=k+a[i,j];
end;
writeln('Сумма элементов главной диагонали = ',k);
end.
К программному обеспечению (ПО) относится также вся область деятельности по проектированию и разработке ПО:
технология проектирования программ (например, нисходящее проектирование, структурное и объектно-ориентированное проектирование и др.); методы тестирования программ [ссылка, ссылка]; методы доказательства правильности программ; анализ качества работы программ; документирование программ; разработка и использование программных средств, облегчающих процесс проектирования программного обеспечения, и многое другое.Программное обеспечение — неотъемлемая часть компьютерной системы. Оно является логическим продолжением технических средств. Сфера применения конкректного компьютера определяется созданным для него ПО.