Цветное( с палитрой из 256 цветов)растровое графическое изображение имеет размер 10*10 точек.какой объем памяти займет это изображение?
113
176
Ответы на вопрос:
Var a,s,i,k: integer; begin for i: =1 to 5 do begin write ('введите число: '); readln (a); if a mod 6 = 0 then begin s: =s+a; k: =k+1 end end; writeln ('cумма чисел, кратных 6, равна: ',s); writeln ('количество чисел, кратных 6, равно: ',k); if (s< > 0) and (s mod 4 = 0) then writeln ('cумма чисел, кратных 6, делится на 4 нацело'); if (s< > 0) and (s mod 4 < > 0) then writeln ('cумма чисел, кратных 6, не делится на 4 нацело') end.
Популярно: Информатика
-
serejafox2326.12.2021 20:49
-
andrey208502.11.2020 18:43
-
ElviraNice10.10.2022 09:41
-
Stoianova198810.02.2022 13:59
-
Vivitek3102.02.2022 06:10
-
M8922669113005.06.2020 01:59
-
аня283829.05.2020 19:13
-
Сокол11111111127.08.2021 12:11
-
Vanja8172829.08.2022 22:14
-
SeregaDvoihnik15.05.2021 16:03