Народ, написать программу на vba. 1. даны два действительных числа x и y. если наименьшее из них отрицательно, то заменить его нулем, в противном случае единицей. 2. даны целые числа a1, a2, an. вычислить s=1/a1+1/(a1+a2)++1/(a1+a2++an)
Во время ВОВ сложные технические и криптографические средства зашиты информации стали во многом ключевыми, ведь ценность информации возросла кратно. К июню 1941, когда немецкие армии вторглись на территорию СССР, наша система защиты государственной тайны была практически полностью сформирована. Она успешно выполняла целый ряд поставленных перед ней задач. От любых иностранных разведок надежно защищались все информационные ресурсы: мобилизационные, технические, военные, политические, идеологические и природные.
using System;
namespace restless
{
class Program
{
static void Main()
{
int x = Convert.ToInt32(Console.ReadLine());
int _counter = x.ToString().Length;
bool IsEven = (x & 1) == 0 ? true : false;
if (_counter == 1 && IsEven)
Console.WriteLine("Четное однозначное число");
else if (_counter == 1 && !IsEven)
Console.WriteLine("Нечётное однозначное число");
else if (_counter == 2 && IsEven)
Console.WriteLine("Чётное двузначное число");
else if (_counter == 2 && !IsEven)
Console.WriteLine("Нечётное двузначное число");
else if (_counter == 3 && IsEven)
Console.WriteLine("Чётное трехзначное число");
else if (_counter == 3 && !IsEven)
Console.WriteLine("Нечётное трехзначное число");
}
}
}
Во время ВОВ сложные технические и криптографические средства зашиты информации стали во многом ключевыми, ведь ценность информации возросла кратно. К июню 1941, когда немецкие армии вторглись на территорию СССР, наша система защиты государственной тайны была практически полностью сформирована. Она успешно выполняла целый ряд поставленных перед ней задач. От любых иностранных разведок надежно защищались все информационные ресурсы: мобилизационные, технические, военные, политические, идеологические и природные.