Регистрация
Emmz
25.06.2022 19:24
Информатика
Есть ответ 👍

Назовите 2 способа уменьшить размер файла в формате .bmp​

231
443
Посмотреть ответы 1

Ответы на вопрос:

Carolina1Cerry
Carolina1Cerry
4,4(96 оценок)
Uses crt; var i,s,p,a,n: integer; begin    p: =1;     write('введите кол-во чисел  ');   readln(n);   for i: =1 to n do begin                              write('введите ',i,'число: ');                               readln(a);                                 if a< 0 then s: =s+a                              else p: =p*a                            end;   writeln('сумма отрицательных чисел равна: ',s);   writeln('произведение всех положительных чисел равно: ',p)end.как-то так)

Популярно: Информатика