
Perikelv
6 год назад
Написать программу которая может подсчитать количество различных чисел. Паскаль. числа рандомные!!!
ОТВЕТЫ

Feliksovich
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.
127
Смежные вопросы: