Не у меня) какой это класс
===== PascalABC.NET =====
function GetArr(n: integer) :=
ReadArrInteger('Вводите эдементы массива:', n);
function Summ(a: array of integer): integer;
begin
if a.Any(p -> p < 0) then
Result := a.TakeWhile(p -> p >= 0).Sum
else
Result := a.Sum
end;
// Тест
begin
var M := GetArr(ReadInteger('n ='));
Println(Summ(M))
end.
1) Пуск->Все программы->Стандартные->Проводник
2)Нажатием любой кнопки на клавиатуре или мыши
3)Правой кнопкой мыши по пустому месту, в открывшемся меню выбрать раздел "Создать"->"Создать папку"
4)Эти операции производятся при помощи меню, открывающегося правой кнопкой мыши(возможно еще чем-то).
Program funt;Var m, f:real;beginwriteln('Введите количество фунтов');readln(f);m:=f*453;writeln('Ответ:',m);end.
Привет, код ниже, для справки по функциям советую посетить MSDN.
Если остаются вопросы так же есть хороший сайт как METANIT, там ты можешь найти простые примеры и простую документацию.
Если хочется проверить работаю кода, то есть прекрасный ресурс как Repl It.
Если есть вопросы, пиши в комментариях. За дополнительной информацией пиши в ЛС.
Спасибо за отметку "Лучшее решение" и нажатую кнопочку спасибо и у меня в профиле.
Так же в моем профиле вы можете найти полезные ссылки на ресурсы описанные выше.
-----------------------------------------------------------------------
using System;
class MainClass {
public static int getProductOfNegativeNumbers(int[] array)
{
int result = 1;
foreach (int element in array)
{
if (0 > element)
{
result *= element;
}
}
return result;
}
static void Main()
{
Console.WriteLine("Please, enter length of array: ");
int sizeOfArray = Convert.ToInt32(Console.ReadLine());
int[] array = new int[sizeOfArray];
for (int i = 0; i < sizeOfArray; ++i)
{
Console.WriteLine("Please, enter array entry: ");
array[i] = Convert.ToInt32(Console.ReadLine());
}
int productOfNegativeNumbers = getProductOfNegativeNumbers(array);
Console.WriteLine("Product of negative numbers is: {0}", productOfNegativeNumbers);
}
}
