Ввести число 1
|
Ввести число 2
|
Если число 1 больше числа 2
да нет
| |
чиcло1=число1*2 чиcло1=число1^2
чиcло2=число2^2 чиcло2=число2*2
|_____________________ |
|
Вывести число 1
|
Вывести число 2
Активная ячейка В2
диапазоны: А1:А2, D1:E2, A4:C4
Так как язык указан не был, написал на C++
\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
#include <iostream>
using namespace std;
int main() {
setlocale(LC_ALL, "Russian");
const size_t len = 40;
int arr[40];
for (size_t i = 0; i < len; ++i)
arr[i] = 5 - rand() % (10);
size_t count = 0;
for (size_t i = 0; i < len; ++i)
if (arr[i] > 0)
count++;
cout << count << endl; return 0;
}
<span>все очень легко;)
внутри проверка (i mod 3 =0) and (i mod 10 = 2) и суммируй</span>
<em>PascalABC.NET 3.3, сборка 1547 от 07.10.2017</em>
<em>Внимание! Если программа не работает, обновите версию!</em>
begin
var x:=ReadReal('Введите число:');
Writeln('Его квадрат ',x*x,', куб ',x*x*x)
end.
<u>Пример</u>
Введите число: -35.432
Его квадрат 1255.426624, куб -44482.276141568