//PascalABC.NET 3.2 сборка 1318
Var
s:array[1..60] of char;
i,j,len:integer;
begin
len:=60;
for i:=1 to 60 do
read(s[i]);
i:=1;
while(i<=len-3) do
begin
if (s[i]='m') and (s[i+1]='a') and (s[i+2]='m') and (s[i+3]='a') then
begin
s[i]:='d';
s[i+1]:='e';
s[i+2]:='d';
for j:=i+3 to len-1 do
s[j]:=s[j+1];
dec(len);
end;
inc(i);
end;
for i:=1 to len do
write(s[i]);
end.
Var i: byte;
begin
randomize;
for i := 1 to 10 do
writeln(random(100)+50);
end.
54 в 7ричной =1*4+5*7=39 в десятичной
320 в 5ричной=25*3+10=85 в десятичной
39+х=85
х=46
46 в десятичной =2Е
ответ: 2Е
Значение функции:
А В -> значение
0 0 -> 0
0 1 -> 1
1 0 -> 1
1 1 -> 1
изображение не подскажу
Привет, код ниже, для справки по функциям советую посетить 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);
}
}