Ответ:
program s;
var
a:array [1..50] of integer;
i,P,C: integer;
begin
for i:=1 to 7 do
begin
a[i]=random (30);
end;
for i:=1 to 7 do begin
C:=C+a[i];
Р:=P*a[i];
end;
writeln (C);
writeln (P);
end.
Объяснение:
Вообще программа вычисляла произведение всех элементов массива. Теперь вычисляет и сумму всех элементов массива.
1250 * 1024 = 1280000 байт
256 = 2^8 - следовательно для цвета используется 8 разрядов
один экран с цветов
640* 400 = 256000 бит * 8 = 2048000 бит / 8 = 256000 байт
страниц видеопамяти оно занимает
<span>1280000 / 256000 = 5 страниц</span>
Ну ты просто выдумал себе сложности, при вызове F она выведет 9, паскаль не знаю, но точно утверждаю, что это так.
Сначала идёт вывод переменной а потом операции с ней, ничего додумывать не нужно.