Program gt; var a:array[1..1000]of real; n,i:integer; s,b:real; begin readln(n); //n- кол-во чисел массива readln(b); //b-число которое вводиться с клавиатуры для проверки s:=0; for i:=1 to n do begin read(a[i]); if (a[i] > b) then s:=s+a[i]; end; writeln(s); end.
#include <iostream> #include <iomanip> using namespace std;
int main() { int n; cout<<"n = "; cin>>n; // ввод количества элементов массива int a[n]; // заполнение массива и вывод на экран for (int i=0;i<n;i++) { a[i]=rand()%15; cout<<a[i]<<" "; } cout<<endl; // перевод строки // сортировка массива по возрастанию for (int i=0; i<n-1; i++) for (int j=i+1; j<n; j++) if (a[i]>a[j]) swap(a[i],a[j]); // вывод 4 минимальных cout<<"four min numbers: "; for (int i=0; i<4; i++) cout<<a[i]<<" "; cout<<endl; system("pause"); // ожидание ввода с клавиатуры return 0; }
#include <iostream> #include <iomanip> using namespace std;
int main() { int n; cout<<"n = "; cin>>n; // ввод количества элементов массива int a[n]; // заполнение массива и вывод на экран for (int i=0;i<n;i++) { a[i]=rand()%15; cout<<a[i]<<" "; } cout<<endl; // перевод строки // сортировка массива по возрастанию for (int i=0; i<n-1; i++) for (int j=i+1; j<n; j++) if (a[i]>a[j]) swap(a[i],a[j]); // вывод 4 минимальных cout<<"four min numbers: "; for (int i=0; i<4; i++) cout<<a[i]<<" "; cout<<endl; system("pause"); // ожидание ввода с клавиатуры return 0; }
var a:array[1..1000]of real;
n,i:integer;
s,b:real;
begin
readln(n); //n- кол-во чисел массива
readln(b); //b-число которое вводиться с клавиатуры для проверки
s:=0;
for i:=1 to n do
begin
read(a[i]);
if (a[i] > b) then s:=s+a[i];
end;
writeln(s);
end.