В языке Паскаль описатель типа integer требует выделить под каждую переменную или элемент массива количество памяти, необходимое для размещения чисел из диапазона , т.е. отвести не менее двух байт, что и выполнялось в ранних системах, таких как Turbo Pascal, созданных во времена дорогой оперативной памяти. В современных разработках может выделяться и большее количество байт, например, в PascalABC.Net под переменную типа integer отводится 4 байта.
Описатель array [1..20] of integer требует отвести память под 20 элементов типа integer, следовательно, если говорить о минимально необходимом количестве байт, то ответом будет в) 20, 40. А для PascalABC.Net ответ должен быть 20, 80.
Написать программу, которая выводит на экран сумму ряда
пусть a – числитель; b – знаменатель; da и db – шаг для числителя и знаменателя; n - для смены знака; Программа: const da= -18; {927-945} db= 24; {33-9} var a,b,n: integer; s: real; begin s:=0; n:=1; a:=945;b:=9; while a>=27 do begin s:=s+a/b*n; {подсчет суммы} a:=a+da; b:=b+db; n:= -1*n; {изменение знака} end; writeln('s=',s:4:2); end.
Описатель array [1..20] of integer требует отвести память под 20 элементов типа integer, следовательно, если говорить о минимально необходимом количестве байт, то ответом будет в) 20, 40.
А для PascalABC.Net ответ должен быть 20, 80.
пусть a – числитель; b – знаменатель; da и db – шаг для числителя и знаменателя; n - для смены знака;
Программа:
const
da= -18; {927-945}
db= 24; {33-9}
var a,b,n: integer;
s: real;
begin
s:=0; n:=1; a:=945;b:=9;
while a>=27 do
begin
s:=s+a/b*n; {подсчет суммы}
a:=a+da;
b:=b+db;
n:= -1*n; {изменение знака}
end;
writeln('s=',s:4:2);
end.