Создать программу в паскале используя массив: найти сумму элементов, больших числа а.
program xxx;
var i, n : integer;
a, s : real;
b : array [1..20] of real;
begin
writeln('введите число а=');
readln(a);
writeln('введите размерность массива n=');
readln(n);
write('введите элементы массива b: ');
for i: =1 to n do
readln(b[i]);
writeln('исходный массив b: ');
for i: =1 to n do
writeln(b[i]);
s: =0;
for i: =1 to n do
if b[i] > a then s: =s+b[i];
writeln('сумма элементов =', s);
readln
end.
program p_1; var i, n : integer; a, s : real; b : array [1..1000] of real; begin writeln('введите число а'); readln(a); writeln('введите количество значений массива n'); readln(n); write('введите элементы массива b'); for i: =1 to n do readln(b[i]); writeln('первоначальный массив b'); for i: =1 to n do writeln(b[i]); s: =0; for i: =1 to n do if b[i] > a then s: =s+b[i]; writeln('сумма значений =', s); end.
1)Архиватор – это программа, которая осуществляет сжатие одного или множества файлов с последующей упаковкой в архив. Говоря более простым языком, она может как уменьшить размер одной песни или текстового документа, так и сделать это с несколькими, создав архив - один файл из множества, который потом можно распаковать и на выходе получить исходную информацию до упаковки и сжатия.
2)Архиватор позволяет создавать различные виды архивов: архив из группы файлов или из одного файла, многотомный архив, непрерывный архив, архивы разных форматов (rar, zip, sfx). Многотомный архив – это один архивный файл, хранящийся на нескольких носителях.
3)Подробный обзор и ссылки на скачивание лучших программ для архивации данных — архиваторов — для компьютеров на базе ОС Windows. ... При упаковке некоторых видов файлов их конечный размер может быть уменьшен на 90-95%. Все современные.
Объяснение:
можно ответ лучшим