program znanijacom;
const
n = 5;
type
mas = array[1..n] of integer;
var
a: mas;
i: integer;
max: integer;
begin
writeln('введите элементы массива');
for i:=1 to n do readln(a[i]);
writeln('вывод элементов массива:');
for i:=1 to n do write(a[i]:3);
max := a[1];
for i:=1 to n do if a[i] > max then max := a[i];
writeln(' максимальный элемент: ', max);
writeln('массив после изменений: ');
for i:=1 to n do begin
if a[i] = max then a[i] := a[i]*i;
write(a[i]:3);
end;
end.
Объяснение:
using System;
namespace kp9p_pr_10_zad_7
{
class Program
{
delegate void Anon(int a, int b, int h); // анонимный метод
delegate double Lymbd(int a, int h); // метод с использованием лямбда выражения
static void Main(string[] args)
{
bool usl = false;
int a = 0, b = 0, h;
while (usl != true)
{
Console.Write("Введите первое значение: ");
a = Convert.ToInt32(Console.ReadLine()); // ввод первого значения
Console.Write("Введите второе значение: ");
b = Convert.ToInt32(Console.ReadLine()); // ввод второго значения
if (a < b) // если a меньше b
{
usl = true; // условие = правда
}
else
{
Console.WriteLine("\nНекорректный ввод\n");
}
}
Console.Write("Введите шаг: ");
h = Convert.ToInt32(Console.ReadLine()); // ввод шага
void anon(int a1, int b1, int h1)
{
Console.WriteLine("\nС использованием анонимного метода\n\nЗначение аргумента:\tответ:\n"); // /t - табуляция
for (int i = a; i <= b; i += h1)
{
Console.WriteLine("{0}\t\t\t{1:f2}", i, Math.Sqrt(h1) * Math.Pow(Math.Cos(i), 2)); // вычисление и вывод значений функции
}
}
anon(a, b, h);
static double lyamb(int a1, int h1) => Math.Sqrt(h1) * Math.Pow(Math.Cos(a1), 2); // вычисление значений функции
Console.WriteLine("\nС использованием лямбда-выражения\n\nЗначение аргумента:\tответ:\n");
for (int i = a; i <= b; i += h)
{
Console.WriteLine("{0}\t\t\t{1:f2}", i, lyamb(i, h)); // вывод значений функции
}
}
}
}
