Написать программу с использованием подпрограммы для вычисления суммы s=1+3+5..+a"
(паскаль)
157
187
Ответы на вопрос:
var a: integer;
function sumn (n: integer): integer;
var
i,sum: integer;
begin
i: =1;
sum: =0;
while i< =n do
begin
sum: =sum+i;
i: =i+2;
end;
if n mod 2 = 0 then sum: =sum+n;
sumn: =sum;
end;
begin
readln(a);
writeln('сумма нечётных до "a"(вкулючая в сумму "a", даже если оно чётное): ',sumn(a));
end.
300 Кб
Объяснение:
Изображение размером 320*480 содержит
320*480=153600 точек.
Для каждой точки необходимо хранить 16 бит = 2 байта палитры (из условия)
Тогда для всего изображения понадобится 2*153600=307200 байт, или 307200 /1024=300 Кб
Популярно: Информатика
-
rubaqlo02.03.2023 05:38
-
vulpe17.01.2022 12:30
-
Viktoria123vay23.08.2021 00:18
-
ruevtop16.06.2020 14:23
-
sananana121.09.2021 12:38
-
PSerega1111111124.03.2022 00:32
-
kanyakhin13.06.2020 15:47
-
Phelper12.10.2020 04:08
-
DiANa2407125.02.2023 00:53
-
maksategemberdi27.02.2020 13:50