var
m : array [1..10] of Integer;
i, b, s, p : Integer;
begin
Writeln('Введите массив:');
for i := 1 to 10 do
begin
Write(i, ': ');
Readln(m[i]);
end;
s := 0;
b := m[1];
p := 1;
for i := 1 to 10 do
begin
if b < m[i] then b := m[i];
if m[i] > 0 then s := s + m[i];
if m[i] mod 2 = 0 then p := p * m[i];
end;
Writeln('Наибольший элемент = ', b);
Writeln('Сумма неотрицаельных элементов = ', s);
Writeln('Произведение четных элементов = ', p);
ReadLn;
end.
1. Меньше тигра, больше кошки,
Над ушами кисти-рожки,
С виду — кролик, но не верь -
страшен в гневе этот зверь!
И ему не крикнешь «брысь»!
Потому что это ... (рысь)
2. Он слетает белой стаей
И сверкает на лету,
Он звездой прохладной тает
На ладони и во рту... (снег)
3. Кто осенью спать ложится,
А весной встаёт... (медведь)
4. Жил я посреди двора,
Где играет детвора.
Но от солнечных лучей
Превратился я в ручей... (снеговик)
5. Что вверх корнем растёт? (сосулька)
6. Из капкана он уйдёт,
Из аркана убежит,
В тундре звёздной и морозной
Всюду путь ему открыт... (ветер)
7. За белой дверцей стужа, лёд.
Там Дед Мороз, друзья, живёт. (холодильник)
8. Пришла из лесу птичница в рыжей шубке кур посчитать. (лисичка)
9. Белой стайкой мошкара
Вьётся, кружится с утра.
Не пищат и не кусают,
Просто так себе летают. (снежинки)
10. Скачет по лесу то взад, то вперёд,
Воет, гудит, деревья трясёт. (вьюга)
class Program
{
static void Main()
{
var random = new Random(DateTime.Now.Millisecond);
int n = 3;
var f = new int[n, n];
int c;
Console.WriteLine("f:");
for (var i = 0; i < n; i++)
{
for (var j = 0; j < n; j++)
{
f[i, j] = random.Next(0, 9);
Console.Write(f[i, j] + " ");
}
Console.WriteLine();
}
Console.WriteLine();
for(int i = 0; i < n; i++) {
if (f[i,0] != f[i,i]){
c = f[i,0]; f[i,0] = f[i,i]; f[i,i] = c;
}
}
Console.WriteLine("New f:");
for(int i = 0; i < n; i++){
for (var j = 0; j < n; j++)
Console.Write(f[i,j] + " ");
Console.WriteLine();
}
Console.WriteLine();
Console.ReadKey();
}
}
Пример:
f:
8 1 0
3 6 3
0 5 7
New f:
8 1 0
6 3 3
7 5 0