
Ростислав
6 год назад
Напишите программу которая выводит количество неодинаковых чисел . Например:
Входные данные 2 5 6 3 5
Выходные 3
Паскаль с рандомными числами
ОТВЕТЫ

Степан
Aug 1, 2019
//PascalABC.Net 3.1 сборка 1200
begin
var a := ArrRandomInteger(10, 0, 10);
Println(a);
writeln(a.Distinct().Count);
end.
begin
var a := ArrRandomInteger(10, 0, 10);
Println(a);
writeln(a.Distinct().Count);
end.
94
Смежные вопросы: