===== PascalABC.NET =====
begin
var a := ArrRandom(12, -2, 15);
Println('Исходный массив');
a.Println;
Println('Отобранные элементы');
a[2:].Println;
Println('После сортировки');
a[2:].Sorted.Println
end.
#include <stdio.h>
int main(){ int i; for ( i = 10; i < 100; i++ ) { if(i==((i/10)*(i%10))*3){ printf( "%d\n", i ); } } getchar();}Алгоритм тот-же
Ночь-Дочь-Доль-Даль-Дань-День