Перевод из Pascal в C++ program Project1; const n=8; var a:array [1..n] of integer; i,j,sum5,sumn:integer; - id1147940820210124 от Нидл 24.01.2021 11:38

Question

Информатика: Перевод из Pascal в C++ program Project1; const n=8; var a:array [1..n] of integer; i,j,sum5,sumn:integer; begin randomize; for i:=1 to n do begin a[i]:=random(25)+1; write(a[i]:3); end; sum5:=0; sumn:=0; for i:=1 to n do begin if a[i] mod 5 = 0 then inc(sum5); if a[i] i then inc(sumn); end; writeln; writeln( количество элементов кратных 5 равно ,sum5); writeln( количество элементов больше своего номера равно ,sumn); end.

Нидл · Accepted Answer

using System;

using System.Linq;

namespace task29760750

{

internal class Program

{

private static void Main(string[] args)

{

var N = int.Parse(Console.In.ReadLine());

var array = Console.In.ReadLine()

.Split(' ')

.Select(int.Parse)

.ToArray();

var X = int.Parse(Console.In.ReadLine());

var indices = array

.Select((t, i) => t == X ? i : -1)

.Where(t => t > 0)

.ToArray();

Console.Out.WriteLine(indices.Any() ? string.Join(" ", indices) : "-1");

}

MOGZ ответил