Сделайте сгруппируйте заданные компьютерные программы. ms paint, windows 7, open office. org writer, turbo pascal, internet explorer ,alplogo, notepad ,ms powerpoint, mozilla firefox
function summdel(x:integer):integer; //результат - сумма делителей х var k,sum:integer; begin sum:=0; for k := 1 to x div 2 + 1 do if x mod k = 0 then sum:= sum+k; summdel:=sum; end;
begin writeln('Введите границы a,b '); readln(a,b); maxsumm := 1; max := 1; for i := a to b do begin if summdel(i) > maxsumm then begin maxsumm:= summdel(i); max := i; end; end; writeLn('Максимальная сумма делителей - ', maxsumm, ' число - ',max) end.
Windows 7
Прикладные программыТе, которые обеспечивают решение задач пользователяMS Paint, MS PowerPoint, Mozila Firefox, Internet Explorer, Notepad
Инструментарий программированияТо, чем пользуются при создании ПОTurbo Pascal, Open Office.org Writer
AIPLogo (?) - что за программа? Если относится к созданию чего-то, тогда относим в третий список. В ином случае во второй.