{Free Pascal Compiler version 3.0.4+dfsg-23 [2019/11/25] for x86_64}
{Copyright (c) 1993-2017 by Florian Klaempfl and others}
{Target OS: Linux for x86-64}
program test;
Uses Math;
const N = 15;
var
A : array[1..N] of integer;
i, mx, k : integer;
begin
Randomize;
{Генерация и печать массива}
for i := 1 to N do begin
A[i] := Random(50);
write(A[i], ' ');
if A[i] mod 2 = 1 then mx := A[i]
end;
writeln;
for i := 1 to N do
if A[i] mod 2 = 1 then
if A[i] < mx then begin
mx := A[i];
k := i
end;
writeln('Число - ', mx, ', позиция - ', k);
end.
Результат выполнения программы:
Вариант C:
#include <stdio.h>
#define SIZE 10
int main(void)
{
float result = 1;
float array[SIZE];
for(int i = 0; i < SIZE; ++i)
{
scanf("%f", &array[i]);
if(array[i] > 0 && (i % 6 == 0))
{
result *= array[i];
}
}
printf("Произведение элементов, удовл. условию = %f", result);
return 0;
}
Вариант C++:
#include <iostream>
const int _size = 67;
int main()
{
float result = 1;
float arr[_size];
for(int i = 0; i < _size; ++i)
{
std::cin >> arr[i];
if(arr[i] > 0 && (i % 6 == 0))
{
result *= arr[i];
}
}
std::cout << "Результат = " << result;
return 0;
}
Объяснение:
Проверяем элемент. Если он больше нуля и стоит на позиции, кратной 6, то добавляем в общее произведение.
С:\Страна\Франция\ЭйфелеваБашня.heic
Объяснение:
С:\Страна\Россия\Москва
подъем на два уровня вверх означает убрать Москва ( 3 уровень) и Россия ( 2 уровень)
затем добавить два уровня Франция -2 уровень (Страна -1 уровень)
Эйфелева Башня.heic-3 уровень