Очень даю прям Задание №2. Определить произведение двух чисел, если b положительное и частное (a/b) в противном случае. Записать решение задачи на алгоритмическом языке и в виде блок-схемы.
begin writeln('Исходный массив:'); for i := 1 to N do begin a[i] := random(100) - 50; write(a[i]:4); end; iMin := 1;{инциируем первым элементом} for i := 2 to N do {проверяем все остальные} if a[i] < a[iMin] then {новый минимальный} iMin := i; {запомнить i} writeln; {перейти на новую строку} writeln('Минимальный элемент a[', iMin, ']=', a[iMin]); end.
ответ:
брат такой ответ дал незнаю нащет правельно с и но может правельно)
c++выделить код
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
#include
#include
#include
#include
#include
using namespace std;
void main()
{
setlocale(0, "");
srand(time(null));
int a[10] = {};
int b[5] = {};
int c[5] = {};
for (int i = 0, q = 0; i < 10; i++)
{
a[i] = rand() % (20 - (-20) + 1) + (-20);
cout < < a[i] < < endl;
if (a[i] % 2 == 0)
{
cout < < "" < < endl;
b[q] = a[i];
const
N = 5;
var
a: array[1..N] of integer;
i, iMin: integer;
begin
writeln('Исходный массив:');
for i := 1 to N do
begin
a[i] := random(100) - 50;
write(a[i]:4);
end;
iMin := 1;{инциируем первым элементом}
for i := 2 to N do {проверяем все остальные}
if a[i] < a[iMin] then {новый минимальный}
iMin := i; {запомнить i}
writeln; {перейти на новую строку}
writeln('Минимальный элемент a[', iMin, ']=', a[iMin]);
end.