Ответы на вопрос:
Кодировать в png, не в jpeg, gif ну или настроить степень сжатия в соответствующих кодировальных программах
Pascalabc.net 3.4.2, сборка 1857 от 05.11.2018 внимание! если программа не работает, обновите версию!
begin
var a : = arrrandom(10, 20, 30);
a.println;
var p : = 1;
foreach var t in a do
if t = 25 then p *= 25;
if p = 1 then p : = 0;
p.println;
end.
24 27 25 24 27 21 27 25 26 25 15625Популярно: Информатика
-
Nikilengelo28.10.2022 19:39
-
АлинаМалинка11613.10.2021 12:28
-
жenya17.07.2020 03:10
-
fffff13130.03.2020 22:59
-
mama79124.05.2021 17:20
-
fatima777799ozu0sv04.12.2021 11:10
-
отличник73803.03.2020 02:24
-
yanchikkatsia08.02.2022 00:03
-
витно02.01.2022 03:18
-
Dabby112.01.2020 14:58