var
a: array[1..1000] of real;
i, k, n, z: integer;
begin
writeln('введите число n: ');
readln(n);
writeln('введите число z: ');
readln(z);
writeln('введите ',n,' действительных чисел (каждое с новой строки): ');
for i : = 1 to n do
begin
readln(a[i]);
if a[i] > z then
begin
a[i] : = z;
k : = k + 1;
end;
end;
writeln('количество замен: ', k);
end.
var
a: array[1..1000] of real;
i, k, n, z: integer;
begin
writeln('введите число n: ');
readln(n);
writeln('введите число z: ');
readln(z);
writeln('введите ',n,' действительных чисел (каждое с новой строки): ');
for i : = 1 to n do
begin
readln(a[i]);
if a[i] > z then
begin
a[i] : = z;
k : = k + 1;
end;
end;
writeln('количество замен: ', k);
end.
#include <iostream>
#include <fstream>
#include <ctime>
#define SIZE 30
signed main()
{
setlocale(LC_ALL, "Rus");
srand(time(NULL));
int arr[SIZE];
long prod = 1;
std::cout << "Сгенерированный массив: ";
for (int i = 0; i < SIZE; i++) {
arr[i] = rand() % 10;
std::cout << arr[i] << " ";
}
for (int i = 0; i < SIZE; i += 2) {
prod *= arr[i];
}
std::cout << "\nПроизведение элементов массив с четными номерами: " << prod;
std::ofstream fout("my.txt");
fout << prod;
return 0;
}